Fork me on GitHub
摘要: View Code Public Function GetColName(ByVal strAddress As String, ByVal Start As Integer) As String' Dim strAddress As String Dim endP As Integer' strAddress = ActiveCell.Address' endP = InStr(2, strAddress, "$") endP = InStr(Start, strAddress, "$") GetColName = SubStr 阅读全文
posted @ 2011-11-25 23:33 逍遥メ风 阅读(2822) 评论(0) 推荐(0)