Hi!
the problem is the following
thank you in advance for your helpsh = range("J1")
Shift = (sh * 12) + 1
s = Str(Shift)
s2 = Str(Shift + 12)
s = s + ":" + s2 <- the problem lies perhaps here. How can you place a quotation mark (") around the string s
Rows(s).Select <- this does not work without thous quotation marks, one would need for ex. "1:6" instead of 1:6
Kind regards
keymuu
Bookmarks