| 
    
     |  | 初めて利用させていただきます。 VBA初心者です。
 本などを参考にしてエクセルマクロを作成しています。
 大体は作ることが出来ましたが、どうしても分からないことがあります。
 A列に最大でも20種類程度の3桁〜4桁程度の番号が入ります。
 入る順番も、バラバラです。
 この番号ひとつひとつに、計算式を付けたいです。
 式は、数量*グラム/0.〜/1000と言うものです。
 式自体はシンプルなので、セルに式をVBAで組み込むことは出来ました。
 ただ、A列に番号が入った時、その番号に式を関連付ける事がどうしても出来ません。
 どなたか、分かる方がいらっしゃいましたら、お知恵を少しお貸しいただけませんでしょうか?
 シートに組み込んだのは、このような式です。
 A列は番号、B列には数量、E列はグラム、G,K,O列には、B列の数量をある割合で割り振ったものを
 G,K,Oの数量に対して、H,L,Pの各セルに計算式をいれました。
 ですが、これでは各セルに式が固定されてしまって
 A列の番号が変わると、それに式が対応できません。
 分からないのは、毎回A列にランダムに入る3〜4桁の番号を判断して、
 その番号に対してこの式を用いると言うことは、可能なのでしょうか?
 
 Private Sub 計算式()
 
 Sheets("***").Select
 '
 Range("H11").Formula = "=G11*E11/0.9/1000"
 '
 
 End Sub
 
 
 |  |