こんにちは
VBA の書き方で困っています。
(H29(a 収支計)ーI27(b 人数)×25,000)÷B9(c 売上)=e 自社含
とういう式があります。
自社含が10%未満だった時に
ワークシート名を赤にしたいのですが、
マイナス%の部分は赤になるのですが、
0%から10%の間に色がつきません。
10%から上も色はつきません。
Sub 赤にする()
Dim WS As Worksheet
For Each WS In Worksheets
WS.Activate
On Error Resume Next
Dim a, b, c, d, e, f
a = Cells(29, 8).Value
b = Cells(27, 9).Value
c = Cells(9, 2).Value
d = a - b * 25000
e = d / c
f = Format(e, "#.##%")
Range("H35") = f
If f <= ("10%") And f <> "" Then
WS.Tab.Color = RGB(255, 0, 0)
End If
Next
End Sub
今は、このような式が入っています。
よろしくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【VBAエラー】Nextに対するForがありません 対策について 5 2022/11/21 21:26
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) コード名シートA列と集計シートA列のコードが一致したら、コード名シートA5からk12の範囲をコピーし 1 2022/08/29 23:46
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/02/02 09:25
- Visual Basic(VBA) エラーコード1004 6 2022/06/09 14:12
- Visual Basic(VBA) 今日の日付が過ぎたらその行を削除したい 1 2023/04/01 20:06
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Excel(エクセル) なぜExit Subがあるのかわかりません 4 2023/02/19 12:34
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Excel(エクセル) VBAの指示の内容 昨日こちらでご教示頂いたのですが初心者な為、一つ一つの指示が何をやっているのかわ 2 2022/10/25 18:08
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAで大量のファイルをシート名...
-
別のシートから値を取得するとき
-
ユーザーフォームに入力したデ...
-
特定の文字を含むシートだけマ...
-
excelのマクロで該当処理できな...
-
【ExcelVBA】全シートのセルの...
-
Excel VBA 複数行を数の分だけ...
-
実行時エラー'1004': WorkSheet...
-
Excelマクロのエラーを解決した...
-
VBA 存在しないシートを選...
-
VBA 入力月で該当シートを選択...
-
実行時エラー1004「Select メソ...
-
同じ作業を複数のシートに実行...
-
VBA 検索して一致したセル...
-
エクセルVBA ListBoxの並び...
-
IFステートの中にWithステート...
-
エクセルVBAでダブルクリックを...
-
EXCEL(VBA)でシート保護がかか...
-
別のシートを参照して計算する方法
-
セルのコピーで「オブジェクト...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
別のシートから値を取得するとき
-
ユーザーフォームに入力したデ...
-
【ExcelVBA】全シートのセルの...
-
同じ作業を複数のシートに実行...
-
Excelマクロのエラーを解決した...
-
excelのマクロで該当処理できな...
-
XL:BeforeDoubleClickが動かない
-
ExcelVBA シート名を複数セルか...
-
実行時エラー'1004': WorkSheet...
-
VBA 存在しないシートを選...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
ブック名、シート名を他のモジ...
-
【Excel VBA】Worksheets().Act...
-
ExcelのVBAのマクロで他のシー...
-
エクセルのシート名変更で重複...
-
特定の文字を含むシートだけマ...
-
シートが保護されている状態で...
-
Excel マクロについての相談
-
VBA 検索して一致したセル...
おすすめ情報