HinoADO xiki
JWW と SketchUp を軸にしたTips集です
使用済みセルの最終列を取得する
For b = 255 To 1 Step -1 Cells(a, b).Select If Cells(a, b).Value <> "" Then Exit For Next b
a 検索する行番号
b 最終列を返します
※エクセルは列数が255までしか使用できません。
※短い上に使用頻度が低いのでスクリプト内に埋め込む場合で記述してあります。
Hino
23:56
2007.01.24 Wednesday
署名
内容
新しい記事
題名
署名
File
本文
コンテンツ
HinoADO Online
(02/25)
HinoADO Tools
(04/17)
HinoADO BBS
(09/08)
HinoADO xiki
(02/23)
アップローダ
MeinMenu
FrontPage
JWW
SketchUp
Kerkythea
Excel
FreeSoft
その他
新しい記事
FrontPage
(11/07)
ロケーションファイル
(02/23)
座標の回転
(02/08)
JW外変用プロシージャ集
(02/08)
2点の角度を求める
(02/08)
最近追記された記事
FrontPage
⇒
Hino
(02/11)
FrontPage
⇒
500R
(02/08)
SketchUp
⇒
Hino
(01/29)
左右対称なコンポーネントのTips
⇒
Hino
(01/24)
GSU
⇒
Hino
(01/24)
カテゴリ一括表示
JWW
(16)
SketchUp
(30)
Excel
(19)
FreeSoft
(0)
その他
(1)
記事検索
QRcode
プロフィール
Hino
RSS 1.0
管理者ページ
a 検索する行番号
b 最終列を返します
※エクセルは列数が255までしか使用できません。
※短い上に使用頻度が低いのでスクリプト内に埋め込む場合で記述してあります。