jobvbaのプロフィール
- ベストアンサー数
- 2
- ベストアンサー率
- 50%
- お礼率
- 60%
- 登録日2006/04/23
- エクセルＶＢＡでスケジュール表作成・２
http://oshiete1.goo.ne.jp/qa3608086.htmlの続きです。 エクセルＶＢＡで、１ヵ月単位のスケジュール表を作成しています。 ここの方々のご協力で、 原紙をコピー→任意の年・月のカレンダーを自動入力 というところまではできました。 今度は、新しいシートの「Ｃ」列へ自動入力された曜日のうち、 「土」か「日」だったら行全体を16番の色で塗りつぶすという 処理をしたいと思います。 しかし、 For Each C In TargetRange If C.Formula.Value = "土" Or "日" Then ActiveRows.Font.ColorIndex = 16 Next oneCell だとエラーになってしまいます。（「Nextに対応するForがない」と言われます？？） ヒントなどありましたらお願いいたします。
- エクセルＶＢＡでスケジュール表作成・２
http://oshiete1.goo.ne.jp/qa3608086.htmlの続きです。 エクセルＶＢＡで、１ヵ月単位のスケジュール表を作成しています。 ここの方々のご協力で、 原紙をコピー→任意の年・月のカレンダーを自動入力 というところまではできました。 今度は、新しいシートの「Ｃ」列へ自動入力された曜日のうち、 「土」か「日」だったら行全体を16番の色で塗りつぶすという 処理をしたいと思います。 しかし、 For Each C In TargetRange If C.Formula.Value = "土" Or "日" Then ActiveRows.Font.ColorIndex = 16 Next oneCell だとエラーになってしまいます。（「Nextに対応するForがない」と言われます？？） ヒントなどありましたらお願いいたします。
- エクセルＶＢＡでスケジュール表作成・２
http://oshiete1.goo.ne.jp/qa3608086.htmlの続きです。 エクセルＶＢＡで、１ヵ月単位のスケジュール表を作成しています。 ここの方々のご協力で、 原紙をコピー→任意の年・月のカレンダーを自動入力 というところまではできました。 今度は、新しいシートの「Ｃ」列へ自動入力された曜日のうち、 「土」か「日」だったら行全体を16番の色で塗りつぶすという 処理をしたいと思います。 しかし、 For Each C In TargetRange If C.Formula.Value = "土" Or "日" Then ActiveRows.Font.ColorIndex = 16 Next oneCell だとエラーになってしまいます。（「Nextに対応するForがない」と言われます？？） ヒントなどありましたらお願いいたします。
- エクセルＶＢＡでスケジュール表作成・２
http://oshiete1.goo.ne.jp/qa3608086.htmlの続きです。 エクセルＶＢＡで、１ヵ月単位のスケジュール表を作成しています。 ここの方々のご協力で、 原紙をコピー→任意の年・月のカレンダーを自動入力 というところまではできました。 今度は、新しいシートの「Ｃ」列へ自動入力された曜日のうち、 「土」か「日」だったら行全体を16番の色で塗りつぶすという 処理をしたいと思います。 しかし、 For Each C In TargetRange If C.Formula.Value = "土" Or "日" Then ActiveRows.Font.ColorIndex = 16 Next oneCell だとエラーになってしまいます。（「Nextに対応するForがない」と言われます？？） ヒントなどありましたらお願いいたします。
- エクセルＶＢＡでスケジュール表作成・２
http://oshiete1.goo.ne.jp/qa3608086.htmlの続きです。 エクセルＶＢＡで、１ヵ月単位のスケジュール表を作成しています。 ここの方々のご協力で、 原紙をコピー→任意の年・月のカレンダーを自動入力 というところまではできました。 今度は、新しいシートの「Ｃ」列へ自動入力された曜日のうち、 「土」か「日」だったら行全体を16番の色で塗りつぶすという 処理をしたいと思います。 しかし、 For Each C In TargetRange If C.Formula.Value = "土" Or "日" Then ActiveRows.Font.ColorIndex = 16 Next oneCell だとエラーになってしまいます。（「Nextに対応するForがない」と言われます？？） ヒントなどありましたらお願いいたします。