掲題の通り、XQ1とインテルはいってるタブレットを手放しました。いずれも綺麗に使っていたことから思った以上の値が付きました。http://k-hitorigoto.hatenablog.jp/entry/2016/02/13/000000_1:embed: それぞれにとってかわるモノたちがあり、出番を失って…

カレントセルの列の、最下行アドレス(値の入力された最下行のアドレス)を取得する。 Option Explicit Sub カレントセル列の最後尾アドレスを取得する() Dim currentRange As Range Dim maxRowNum As Integer Dim tmpColumnName As String Dim columnName As …