随笔分类 -  EXCEL_VBA

摘要：最近一个朋友，遇到一个问题，给定坐标，以及面积，需连点成面，然后需要求得左边点顺序 做法，在坐标表A列插入空列，命名为XH 列，B 列为X坐标系，C为Y坐标系，在表里A列填充假定顺序号，跑一次程序，看面积是否满足要求。 思路：通过改变A列的序号，并排序，然后计算面积； 代码为EXCEL VBA. S 阅读全文

摘要：Sub tt() Dim i As Integer For i = 2 To ActiveSheet.UsedRange.Rows.Count If Sheets(1).Cells(i, 6) <> "" Then Dim j As Integer For j = 2 To 153 If Sheet 阅读全文