tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板 [ツリー表示へ]   [Home]
一括表示(VB6.0)
タイトルVB6でExcelの条件付き書式を設定することはできますか?
記事No15974
投稿日: 2014/09/25(Thu) 16:58
投稿者ぼす
VB6でExcelの条件付き書式を設定することは可能でしょうか?

例文を上げて頂けると助かります。
VBAでしかできないことなのでしょうか?

今回、Excelをスプレッドからエクスポートしたファイルに対して、処理をしたいのです。

どうぞ、宜しくお願い致します。

[ツリー表示へ]
タイトルRe: VB6でExcelの条件付き書式を設定することはできますか?
記事No15975
投稿日: 2014/09/25(Thu) 18:44
投稿者魔界の仮面弁士
> VB6でExcelの条件付き書式を設定することは可能でしょうか?

たとえば、「値が 0 ならば背景を黄色にする」という条件をB2セルに加える場合は、こんな感じ。

対象シート.Range("B2").FormatConditions.Add(xlCellValue, xlEqual, "=0").Interior.Color = vbYellow

[ツリー表示へ]
タイトルRe^2: VB6でExcelの条件付き書式を設定することはできますか?
記事No15978
投稿日: 2014/09/30(Tue) 15:05
投稿者ぼす
> > VB6でExcelの条件付き書式を設定することは可能でしょうか?
>
> たとえば、「値が 0 ならば背景を黄色にする」という条件をB2セルに加える場合は、こんな感じ。
>
>  対象シート.Range("B2").FormatConditions.Add(xlCellValue, xlEqual, "=0").Interior.Color = vbYellow


xlCellValue, xlEqualが値がEmptyになってしまいます。
どういう値をセットすればいいのでしょうか?
VB6+Excel2010です。

[ツリー表示へ]
タイトルRe^3: VB6でExcelの条件付き書式を設定することはできますか?
記事No15979
投稿日: 2014/09/30(Tue) 15:13
投稿者ぼす
> > > VB6でExcelの条件付き書式を設定することは可能でしょうか?
> >
> > たとえば、「値が 0 ならば背景を黄色にする」という条件をB2セルに加える場合は、こんな感じ。
> >
> >  対象シート.Range("B2").FormatConditions.Add(xlCellValue, xlEqual, "=0").Interior.Color = vbYellow
>
>
> xlCellValue, xlEqualが値がEmptyになってしまいます。
> どういう値をセットすればいいのでしょうか?
> VB6+Excel2010です。

エラー内容は「プロシージャの呼び出し、または引数が不正です。」になります。
助けて下さい。お願い致します。

[ツリー表示へ]
タイトルRe^4: VB6でExcelの条件付き書式を設定することはできますか?
記事No15980
投稿日: 2014/09/30(Tue) 15:57
投稿者ぼす
> > > > VB6でExcelの条件付き書式を設定することは可能でしょうか?
> > >
> > > たとえば、「値が 0 ならば背景を黄色にする」という条件をB2セルに加える場合は、こんな感じ。
> > >
> > >  対象シート.Range("B2").FormatConditions.Add(xlCellValue, xlEqual, "=0").Interior.Color = vbYellow
> >
> >
> > xlCellValue, xlEqualが値がEmptyになってしまいます。
> > どういう値をセットすればいいのでしょうか?
> > VB6+Excel2010です。
>
> エラー内容は「プロシージャの呼び出し、または引数が不正です。」になります。
> 助けて下さい。お願い致します。

xlSheet.Range("AU8:BO" & pMaxRows).FormatConditions.Add(xlCellValue, xlEqual, "=×").Interior.Color = vbRed

該当プログラムです。宜しくお願い致します。

[ツリー表示へ]
タイトルRe^5: VB6でExcelの条件付き書式を設定することはできますか?
記事No15981
投稿日: 2014/09/30(Tue) 16:25
投稿者魔界の仮面弁士
> xlCellValue, xlEqualが値がEmptyになってしまいます。


Option Explicit を書いていれば、Empty になるのではなく、
「宣言されていない」ということでコンパイルエラーとなるでしょう。

今見ているサイトのサンプル集で、[Excel・Word 関係]のページを開くと、
『参照設定』に関する注意書きがあったかと思いますが、その点はクリアされていますか?


> > > どういう値をセットすればいいのでしょうか?
どうしても「参照設定」したくない場合は、その定数を、Const で定義する必要があります。
具体的な定数値は、Excel 側の VBA で Debug.Print するなどして確認してみて下さい。

[ツリー表示へ]
タイトルRe^6: VB6でExcelの条件付き書式を設定することはできますか?
記事No15982
投稿日: 2014/10/21(Tue) 14:58
投稿者ぼす
> > xlCellValue, xlEqualが値がEmptyになってしまいます。
>
>
> Option Explicit を書いていれば、Empty になるのではなく、
> 「宣言されていない」ということでコンパイルエラーとなるでしょう。
>
> 今見ているサイトのサンプル集で、[Excel・Word 関係]のページを開くと、
> 『参照設定』に関する注意書きがあったかと思いますが、その点はクリアされていますか?
>
>
> > > > どういう値をセットすればいいのでしょうか?
> どうしても「参照設定」したくない場合は、その定数を、Const で定義する必要があります。
> 具体的な定数値は、Excel 側の VBA で Debug.Print するなどして確認してみて下さい。

ありがとうございます。できました!!
参照設定はできていましたが、コンパイルエラーとなっていましたので、Constしました。

[ツリー表示へ]