MissOctober
New Member
- Joined
- May 24, 2018
- Messages
- 16
I'm using MS Office 2010. win7
Somehow I've gotten the selected new rows to focus rather than the most recent one.
I need to use FOR Loop to find and select only the last row.
so how would i put it in [h=1]For...Next Statement[/h]this what i have so far:
Option Explicit
Private Sub CommandButton1_Click()
Dim pass As String
pass = "abc1234"
ActiveSheet.Protect Password:=pass, UserInterFaceOnly:=True
With Range("A17:A42").SpecialCells(xlVisible).Areas(1)
.Offset(.Count).Resize(1).EntireRow.Hidden = False
ActiveSheet.Range("b19:d42").Select
End With
End Sub
Thankful for any and all help!!! Thanks a Million
Somehow I've gotten the selected new rows to focus rather than the most recent one.
I need to use FOR Loop to find and select only the last row.
so how would i put it in [h=1]For...Next Statement[/h]this what i have so far:
Option Explicit
Private Sub CommandButton1_Click()
Dim pass As String
pass = "abc1234"
ActiveSheet.Protect Password:=pass, UserInterFaceOnly:=True
With Range("A17:A42").SpecialCells(xlVisible).Areas(1)
.Offset(.Count).Resize(1).EntireRow.Hidden = False
ActiveSheet.Range("b19:d42").Select
End With
End Sub
Thankful for any and all help!!! Thanks a Million