We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Question is, line 1 selects a fixed Range but I would like to change this to the equivalent of "Shift + Ctrl + End" ie from current cell to the last cell in the row. End Right won't work because there are gaps.
Range("L1:YF1").Select Selection.EntireColumn.Hidden = False For Each Cell In Selection Count = Count + 1 Next Cell Range("L1").Select For Ch = 1 To Count If ActiveCell.Value <> "" And ActiveCell.Value = 0 Then Selection.EntireColumn.Hidden = True Else End If ActiveCell.Offset(0, 1).Range("$A$1").Select Next Ch Range("$K$2").Select
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.