.
Yes.
But you need to replace the PROCESSTEMP macro with this :
Again, Excel / VBA is playing games and I don't understand why. Last night the original PROCESSTEMP macro worked 100%. This morning, it crashed as written soCode:Sub ProcessTemp() ActiveSheet.Pictures.Delete With ActiveSheet .Columns("A:A").Delete .Columns("C:D").Delete ''Exit Sub .Range("A3").Cut .Range("B2").Select ActiveSheet.Paste .Range("A4").Cut .Range("C2").Select ActiveSheet.Paste .Range("A5").Cut .Range("D2").Select ActiveSheet.Paste .Range("A6").Cut .Range("E2").Select ActiveSheet.Paste .Range("A2:E2").Hyperlinks.Delete End With UpdateSheet1 End Sub
it needed to be edited to the above. Go figure.
My personal Web Excel Tutorials
Attention! In the formulas as a delimiter I use a semicolon (; ) if you using my formula, then perhaps you need to use a comma (,)
Also for a decimal number I use a comma (,) you may need to use point (.) instead of
.
Here is a better version of the last macro post. It does a better job of cleaning up after itself.
Code:Sub ProcessTemp() ActiveSheet.Pictures.Delete With ActiveSheet .Columns("C:D").Delete .Columns("A:A").Delete .Range("A3").Cut .Range("B2").Select ActiveSheet.Paste .Range("A4").Cut .Range("C2").Select ActiveSheet.Paste .Range("A5").Cut .Range("D2").Select ActiveSheet.Paste .Range("A6").Cut .Range("E2").Select ActiveSheet.Paste .Range("A2:E2").Hyperlinks.Delete End With UpdateSheet1 End Sub
My VBA solution
Code:Sub Macro1() Range("A1").Select Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _ Semicolon:=True, Comma:=False, Space:=False, Other:=False, FieldInfo _ :=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), _ Array(7, 1)), TrailingMinusNumbers:=True Range("A1:X1").Select Selection.Copy Range("A3").Select Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True End Sub
My personal Web Excel Tutorials
Attention! In the formulas as a delimiter I use a semicolon (; ) if you using my formula, then perhaps you need to use a comma (,)
Also for a decimal number I use a comma (,) you may need to use point (.) instead of
Bookmarks