[[20090205200918]] 『計算方法』(ji-ji) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『計算方法』(ji-ji)

 エクセルで見積もり計算基準書を作成しています。
 見積もり合計は 材料費+加工費=見積金額という計算になります。

 材料費100円、200円、300円の場合の見積金額を計算する場合
 いちいち材料費に金額を入力するのではなく表の1列目に材料費一覧を
 2列目に見積金額を表示させ、1列目の材料費を変動した場合見積金額を
 自動計算するようなエクセルのやり方を教えてください。

 言い換えると
 3+X=Y
 という計算式があって
 X=2の時Y=5と計算されますが
 X=3、X-4の時も同時に求めたい場合

 エクセルでのやり方を教えてください

 こんばんは
>いちいち材料費に金額を入力するのではなく
でもどこかに入力しないと、現代のコンピューターは念じただけでは
計算してくれない・・・・。
と、冗談はさておき、
どこかに材料費だけ入力するから、別の場所に計算金額が出るようなこと?
 
A1に材料費を入力し、加工費が1000円固定で、B1に計算させるなら、B1に
=A1+1000
です。
それとも、「入力方法」のことをおっしゃられているのでしょうか。
リストから選択するようなかんじとか。
(みやほりん)(-_∂)b

 おっと、みやほりんさんと衝突してしまいましたが・・・。

 サンプルデータを載せてもらっておくと
 分かりやすいかもしれません。

 >同時に求めたい
 というのは、
  3パターンの材料費を使用した場合の
  3パターンの見積もり金額を
  3か所のセル(あるいは3つ)求めたい
 ということですか?

 それとも、単純に
  「3+X=Y」
  のXの部分に好きな値を入れたら
  その入れた値に対するYの値を求めたい
 ということですか?
	[A]	[B]
[1]	材料費	見積
	一覧	金額
[2]	100	103
[3]	200	203
[4]	300	303
 B2セルに
=A2+3
 として、B4セルまでコピー

 の様な・・・。

 (HANA)

説明不足の質問に親切な回答ありがとうございます。
わかりやすく質問したつもりが逆にわかりにくくなってしまいました。
実際の計算に沿って説明します。

1シート目に見積もり条件入力表を作りました。
このシートには製品個々の条件を入力しています。
その中に変動費として金価格(円/g)があります。
金価格によって材料費が変動します。
材料費の計算式が2シート目にあってその中の「金価格」セルに
金の価格を入力することで1シート目の見積価格が計算されることにしてあります。
金価格が100円単位で変動した場合製品見積価格を変動させてもらっています。
金価格1000円の場合、1100円の場合、1200円の場合で製品見積価格は
変動します。
現状は2シート目の「金価格」のセルに1000、1100、1200と打ち込んで1シート目を開いて
見積価格を確認しメモしていますがこれを1シート目に表を作りその表に1列目に1000,1100、1200と打ち込み2列目にその金価格で計算した場合の見積金額を自動的に表示させたいのですがそのような方法はないでしょうか?エクセル関数の本で探してみたのですがそのような事例がありませんでした。


 「見積もり条件入力表を作りました。」
   どの位置に、どの様な表か?

 「材料費の計算式が2シート目にあって」
   どの様な式か?

 「その中の「金価格」セル」
   どのセルか?

 「1シート目の見積価格が計算される」
   どの様な式か?

 「製品見積価格」=「金価格」セル の事?

 「1シート目を開いて見積価格を確認しメモしています」
   全体の価格のこと?

 「1シート目に表を作り」
   どの様な表を想定しているか?また、どの位置に?

 「金価格で計算した場合の見積金額を自動的に表示」
   合計金額のこと?

 シートのレイアウトを作成して、
 具体的にセル番地を特定し(仮でも良いですので)
 具体的に現在使用している数式
 また、式が出来ていない部分は希望する結果
 を載せてもらえますか?

 表は、エクセルで作成し、貼り付けてください。
 その際、レイアウトが崩れても かまわず投稿してください。
 どなたかが直して下さると思いますので。

 (HANA)

「見積もり条件入力表を作りました。」
   どの位置に、どの様な表か? シート1添付

 「材料費の計算式が2シート目にあって」
   どの様な式か?
実際は3シート目以降で材料費を計算しその結果が2シート目に展開されるようになっています

 「その中の「金価格」セル」
   どのセルか?
3シート目の1000円のセルです

 「1シート目の見積価格が計算される」
   どの様な式か?
実際は2シート目の販売価格=見積価格です。

 「製品見積価格」=「金価格」セル の事?
Noです。製品見積価格=販売価格=見積価格です。

 「1シート目を開いて見積価格を確認しメモしています」
   全体の価格のこと?
Yesです。

 「1シート目に表を作り」
   どの様な表を想定しているか?また、どの位置に?⇒1シート添付

 「金価格で計算した場合の見積金額を自動的に表示」
   合計金額のこと?
⇒1シート目の表の◎=販売価格です。

1シート目
見積もり計算書

	日付	2009/2/2						
	客先名	A						
	品名	B						
	めっき仕様	C						
	ワークサイズ	520	mm×	340	mm	取り数	5.88 	
	めっき面積	2.120 	dm2/ボード			パターン率	12.48 	
	めっき厚規格	Au	0.05 	μ以上	Ni	3.0 	μ以上	
	狙い値	Au	0.06 	μ狙い	Ni	4.0 	μ狙い	
	タクト時間	7	分					
	セット数	40	枚/キャリア					
	利益率		50.00%					

	金価格(円/g)	見積価格						
	 1000	     2134 						
	 1100       ◎							
	 1200       ◎  (この◎部分に金価格1000円の時の計算のように自動計算したいのです)							

2シート目

			会社名  :		A												
			基板名  :		B												
			仕  様  :		C												
					ワークサイズ			520		340					5.884615385	b/u	
				規格	A面無電解:			Au		μ	Ni		μ	面積		du/b	
					B面無電解:			Au	0.05	μ以上	Ni	3	μ以上	面積	2.12	du/b	
				狙い	Au	0.06		μ狙い					Ni	4		μ狙い	
	F分単価											62.05	円(男子)		55.81	円(女子)	
	*月産数		1320	分÷	7	分/タクト×		40	b/キャリア×		23	日/月	173485.71 			b/月	
													29481.23 			u/月	
	見積もり条件		Au	0.06	μ				Ni	4	μ	面積	2.12	du/b	12.47538462	du/u	
	材料費		Au			312.1 	円/u	÷	5.884615385	b/u			53.03 		円/b		
			その他			452.8 	円/u	÷	5.884615385	b/u			76.94 				
	工賃			7	分/タクト 	×	62.1	円	3	人÷	40	b =	32.60 				
	検査工賃			0.5	分/b	×	55.8	円					27.90 				
				660,000 		円	÷	173,486 		b	=		3.80 				
				680,000 		円	÷	173,486 		b	=		3.92 				
				15,000 		円	÷	173,486 		b	=		0.09 				
				230,000 		円	÷	173,486 		b	=		1.33 				
				1,550,000 		円	÷	173,486 		b	=		8.93 				
				310,000 		円	÷	173,486 		b	=		1.79 				
				320,000 		円	÷	173,486 		b	=		1.84 				
				3,000,000 		円	÷	173,486 		b	=		17.29 				
				275,000 		円	÷	173,486 		b	=		1.59 				
				1,850,000 		円	÷	173,486 		b	=		10.66 				
				8,890,000 									129.97 		円/b		
	小径												241.71 		円/b		
	利益			50.0%									120.86 		円/b		
	販売価格												362.57 		円/b		
													2133.60 		円/u		

3シート目

タンク容量 (L) 525 525 525 525 525 525 2700 1050

処理時間 (分) 5.0 1.0 1.0 1.0 2.0 2.0 20.0 8.0

生産量(ub/月) 29,481 29,481 29,481 29,481 29,481 29,481 29,481 29,481

パターン率(%) 12.5 12.5 12.5 12.5 12.5 12.5 12.5 12.5

めっき膜厚(μm) − - − − − 4.00 0.06

	* 金価格は暫定価格					\1,000	/grAu		


 おっと、思っていたよりへヴィですね。
要するに、2シート目で1000円のときの計算を行って、その結果を
1000円の位置に1シート目に表示しているんですよね。
@の部分を計算する為の部分を複数作っては?
一つの回路に複数のインプットをして、複数のアウトプットを同時に
求めるのはちょっと無理があるかも。
(みやほりん)(-_∂)b


ありがとうございます。
説明では金価格を3水準としましたが実際は1800〜3300円/gまで16水準が必要です。
更に3シート目が材料費の計算の1ページ目でそのあとに約10シートの子シートがバラ下がっています。
したがって16水準×10ページ=160シートをぶら下げなければなりません。
そこで何か関数を使って現状のシート数で計算する方法はないものかと思った次第です。


 御質問者さんの書き込みと衝突してしまいましたが、
 とりあえずそのまま載せておきます。

 みやほりんさんがおっしゃっておられるように
 同じ計算を行うシートをあと2つ作るのが良いと思います。

 一つの金価格で一つの見積もり価格を計算をするのに
  埋め込んだ式が返された結果をさらに別の式で使用して・・・・
 の様に求めておられるのですよね。
  式中のある一部分だけを変えたら、その価格で計算できる
 と言った式ではなく。

 ただ
 >現状は2シート目の「金価格」のセルに1000、1100、1200と打ち込んで
 >1シート目を開いて見積価格を確認しメモしていますが
 シートの切り替えが面倒だと言うだけなら
 3シート目の1000円のセルは
 1シート目の金価格(円/g)を入力しているセル(B14セル?)
 を参照しておけばよいのではないでしょうか。
 「計算結果をメモ」という行為は必要ですが
 「シートを移りながら」という行為は必要なくなると思います。

 後は、マクロを使って
  所定の位置に金価格を入力
   返された値を別の場所に値貼り付け
  所定の位置に次の金価格を入力
  返された値を別の場所に値貼り付け・・・・
 という作業をやらせるか。

 (HANA)

 「マクロを使って」のサンプルコードです。
 セル番地が分からないので、適当に決めました。
 テストの際は、実際のセル番地に合わせてください。

 まず、金価格(円/g)を入力するセルが
   Sheet1のB14セルとします。
 見積もり価格が
   Sheet1のC14セルに計算されるとします。
   (ここに、結果を返す数式が入っている。)

 3シート目の金価格を入れるセルには
 =Sheet1!B14を入れておいてください。

 1800〜3300円/gまで16水準は、
  Sheet1のB17セルから下方向へ入力してください。

 '------
Sub セルの値を変更しながら値取得()
Dim i As Integer
    With Sheets("Sheet1")
        For i = 1 To 16
            .Range("B14").Value = .Range("B" & 16 + i).Value
            .Range("C" & 16 + i).Value = .Range("C14").Value
        Next
    End With
End Sub
 '------

 (HANA)

コメントありがとうございます。
折角「マクロを使って」のサンプルをご教授いただきましたがマクロに関する知識が皆無です。
実際は1シート目のB16に1000円 B17に1100円 B18に」1200円の数値を入れております。販売価格=見積価格が2シートのN34から B16の1000円は3シートのH27セルに展開するようになっています。
教えてもらったマクロのサンプルコードをどのようにエクセルに展開すればよいのでしょうか?

 つまり、
  3シートのH27に「1000」と入力すると
   この値でそれぞれのシートが計算され
  2シートのN34に「2134」と結果が返される。
  1シートのB16:B31に16水準を入力
 って事で良いでしょうか?

 でしたら、↓の様になります。
 金価格(1シートのB16:B31)が未入力の場合も想定して
 少しコードの変更もしました。
 シート名はSheet1,Sheet2,Sheet3としていますので
 それぞれ実際のものに変更して、やってみてください。

 '------
Sub セルの値を変更しながら値取得2()
Dim i As Integer
    With Sheets("Sheet1")
        For i = 1 To 16
            If .Range("B" & 15 + i).Value = "" Then
                .Range("C" & 15 + i).Value = ""
            Else
                Sheets("Sheet3").Range("H27").Value = .Range("B" & 15 + i).Value
                .Range("C" & 15 + i).Value = Sheets("Sheet2").Range("N34").Value
            End If
        Next
    End With
End Sub
 '------

 (HANA)


 もしかして、コードの貼り付け位置・実行方法がわからない・・・?

 一応・・・このコードは標準モジュールに貼り付けます。
  1.Alt + F11 でVBEを起動
  2.挿入(I)→標準モジュール(M) で標準モジュールを挿入し
  3.貼り付けた後
  4.エクセルに戻って「セルの値を変更しながら値取得2」を実行します。

 それにしても、もっと短い名前にすれば良かった。(笑)

 (HANA)
  

そのとおりです。上記のとおり操作してシート名、セル番地を変更しながら下記のように標準モジュールに貼り付けました。
そのあとエクセルの戻って金価格を入力しましたが変化しません。
”A" ”B" ”C"はセルNoに変更するのでしょうか?

'------
Sub セルの値を変更しながら値取得2()
Dim i As Integer

    With Sheets("見積もり入力シート")
        For i = 1 To 23
            If .Range("B" & 22 + i).Value = "" Then
                .Range("C" & 22 + i).Value = ""
            Else
                Sheets("CONDITION").Range("H28").Value = .Range("B" & 22 + i).Value
                .Range("C" & 22 + i).Value = Sheets("計算シート").Range("N51").Value
            End If
        Next
    End With
End Sub
 '------

1シート目のコピーです(ji-ji)
見積もり計算書

	日付	2009/2/2						
	客先名	A						
	品名	B						
	めっき仕様	C						
	ワークサイズ	520	mm×	340	mm	取り数	5.88 	ボード/u
	めっき面積	2.120 	dm2/ボード			パターン率	12.48 	% (dm2/u)
	めっき厚規格	Au	0.05 	μ以上	Ni	3.0 	μ以上	
	狙い値	Au	0.06 	μ狙い	Ni	4.0 	μ狙い	
	タクト時間	7	分					
	セット数	40	枚/キャリア					
	前処理	プラズマ		円/u				
		スクラブ		円/u				
	テープマスク	9190		円/cm×	51	cm		
		9190		円/cm×	170	cm		
		9190		円/cm×	36	cm		
		9190		円/cm×	92	cm		
	テープ全面貼り		0.3	分				
	テープ部分貼り		1	分				
	テープ剥がし		0.3	分				
	利益率		25.00%					
	金建値	(g/円)2300	2300	円/u		
			2400	○ 		円/u		
			2500	○ 		円/u		
			2600	○ 		円/u		
			2700	○ 		円/u		


 >”A" ”B" ”C"はセルNoに変更するのでしょうか?
 これは、このままで大丈夫です。

 このマクロは、入力の変化に伴い実行されるものではありませんので
  4.エクセルに戻って「セルの値を変更しながら値取得2」を実行します。
 をして下さい。

 マクロは貼り付けてもらえましたね。
 見積もり入力シートのB16:B31に 金建値を入れてもらえましたね。
 次は4の手順ですが、もう少し書くと
  Alt + F8 を押して出てくる窓から
  「セルの値を変更しながら値取得2」
  を選択して [ 実行(R) ]
 です。

 マクロが実行され、C16:C31に結果が出ると思います。

 (HANA)

たくさんの回答ありがとうございました。教えていただいたマクロを試してみましたが残念ながら私にはマクロは無理です。パソコンの動きがおかしくなってしまいました。
何とか復旧しましたがマクロはやめです。何枚もの計算シートを作成する最初の方法で計算書を作成しました。当面これで運用します。
ありがとうございました。(ji-ji)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.