色見本

iromihon.jpg

色見本をvbaで作成



For i = 1 To 8
For j = 1 To 7
Cells(i, j).Interior.ColorIndex = (i - 1) * 7 + j
Cells(i, j).Value = (i - 1) * 7 + j
Next j
Next i



を動かしました。



スポンサーサイト

コメントの投稿

非公開コメント

プロフィール

とも

Author:とも
FC2ブログへようこそ!

最新記事
最新コメント
最新トラックバック
月別アーカイブ
カテゴリ
FC2カウンター
検索フォーム
RSSリンクの表示
リンク
QRコード
QR