View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Executor Executor is offline
external usenet poster
 
Posts: 74
Default Locate cell name using variable and looping

Hi Thomas,

Your codepart "Skjul" & i might create the problem
Try this

Sub hideSkjul()
Dim i As Integer
Dim sName As String

For i = 1 To 75
sName = "Skjul" & Trim(CStr(i))
If Sheets("spec").Range(sName).Value = 0 Then
Sheets("spec").Range(sName).EntireRow.Hidden = True
Else
Sheets("spec").Range(sName).EntireRow.Hidden = False
End If
Next
End Sub

Hoop This Helps

Wouter Magre