Sub W() ' MsgBox "行数:" & Selection.Rows.Count Dim rows_count As Integer Dim rows_id As Integer Dim column_count As Integer column_count = Selection.Columns.Count '获取选择区域的列数 'MsgBox column_count '打印列数 rows_id = ActiveCell.
jquery银行电子账单表格填入和编辑 前段时间做的一个银行表格账单的jquery插件,用于金额写入和编辑的应用,希望对大家有所帮助,发现问题欢迎回复 ;(function($){ function getNum(num) { num += ''; var num1 = num.replace(/[^0-9|\.]/g, '0');//清除字符串中的非数字非.字符 if (/^0+/) //清除字符串开头的0 num1 = num1.replace(/^0+/, ''); if (/^\./.t