●EXCEL・VBAの教えて ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このスレッドのURL
■項目テキスト
271:デフォルトの名無しさん 07/02/15 01:38:10 http://www.relief.jp/itnote/archives/001873.php 272:デフォルトの名無しさん 07/02/15 01:48:01 >>268 そういうやつですね。 文字列の長さからいろいろと計算させる予定でした。 結果的にダメっぽいですね。 いろいろとありがとうございました。 >>270 イベントでやるしかないのですね。 >それがユーザー定義関数ってものだ。 名言の匂いがしますね。使わせて頂きます。 >>271 参考になりました。 273:デフォルトの名無しさん 07/02/15 01:48:02 265+266+268+269 あとはがんばって〜。寝るわ。 274:デフォルトの名無しさん 07/02/15 03:47:04 Const a = 1 Const b = 2 Const c = 3 Sub main() a1 = 1 b1 = 1 c1 = 1 cells_a = 0 cells_b = 0 cells_c = 0 Do While cells(a1, a).Text <> "" a1 = a1 + 1 cells_a = cells_a + 1 Loop Do While cells(b1, b).Text <> "" b1 = b1 + 1 cells_b = cells_b + 1 Loop Do While cells(c1, c).Text <> "" c1 = c1 + 1 cells_c = cells_c + 1 Loop cells(1, 5).Value = cells_a cells(2, 5).Value = cells_b cells(3, 5).Value = cells_c End Sub このプログラムを短くできませんか?
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック!
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
5401日前に更新/123 KB
担当:undef