if then nested in a for next ??
hi all ty for help !!
tom's solution works fine when i delete this
Dim c As Range
tty !! byy
"pls123" wrote:
Hi all i need this but it doesn't work like this... any suggestion ?? ty !!
For Each c In Selection.Cells
If Selection.Column = A Then
c.Value = "='C:\WB\[@@MYPAGE." & "-20.-20" & "." & c.Row & "." &
"11111.-11111.4" & ".xlsm]Sheet2'!$T$3"
End If
If Selection.Cells.Column = "B" Then
c.Value = "='C:\WB\[@@MYPAGE." & "-19.-19" & "." & c.Row & "." &
"11111.-11111.4" & ".xlsm]Sheet2'!$T$3"
End If
Next
|