lior03
12-06-2005, 12:58 AM
hello
is it possible to revers columns of a table in excel?
maybe like this
Sub reverse()
Application.ScreenUpdating = False
Dim counti As Integer
Dim countj As Integer
counti = Selection.End(xlToLeft).Column
For countj = 1 To counti - 1
Columns(counti).Cut
Columns(countj).Insert
Next countj
Application.ScreenUpdating = True
End Sub
it does not work.
why?
is it possible to revers columns of a table in excel?
maybe like this
Sub reverse()
Application.ScreenUpdating = False
Dim counti As Integer
Dim countj As Integer
counti = Selection.End(xlToLeft).Column
For countj = 1 To counti - 1
Columns(counti).Cut
Columns(countj).Insert
Next countj
Application.ScreenUpdating = True
End Sub
it does not work.
why?