VBA
samayinlike
这个作者很懒,什么都没留下…
展开
-
二位数组旋转指定角度
二维数组旋转zSub 宏1()'逆时针旋转90度' 宏1 宏Dim CountNum As IntegerDim Rng As RangeDim arr(), temArr()Dim rowStar As Integer, rowEnd As IntegerDim maxInt As IntegerDim colStar As Integer, colEnd As IntegerDim temStr As StringSet Rng = Worksheets("Sheet1").U原创 2021-11-28 22:56:30 · 252 阅读 · 0 评论 -
如何将EXCEL数据表里面的数据逆时针旋转90度
Sub Rotate_90_Degrees_Counterclockwise()'逆时针旋转90度’ 宏5 宏Dim ARR()ARR = Application.WorksheetFunction.Transpose(Worksheets(“WrongMAP源文件”).UsedRange)'ARR = Application.WorksheetFunction.Transpose(ARR)Sheets.Add After:=ActiveSheetFor i = LBound(ARR) To原创 2020-12-04 03:45:13 · 2446 阅读 · 0 评论