QA #5
MTUの「MS:タルフィック」は、既存のExcelではどのように計算していますか
ステータス: | 終了 | 開始日: | 2015/05/28 | |
---|---|---|---|---|
優先度: | 高め | 期日: | 2015/06/01 | |
担当者: | 姜 玉華 | 進捗率: | 0% | |
カテゴリ: | - | 作業時間の記録: | - | |
対象バージョン: | - |
説明
MS:タルフィックは、ユーザーの話では、CADデータの取得はしていないとのことです。
その代り、Excel内で計算処理があるとのことです。
どこで計算されているか、また仕様書に書かれているか教えてください。
履歴
#3 姜 玉華 が約10年前に更新
「MS:タルフィック」をキーワードとして、見つかりません。計算としては、下記の計算じゃないのですか?
'筋違金物拾い数量(各階の合計)
If ThisWorkbook.Worksheets(SheetName_Hagara).Cells(intLoopHagaraRows, 2) = "MS" And _
ThisWorkbook.Worksheets(SheetName_Hagara).Cells(intLoopHagaraRows, 9) = "スジカイカナモノ" Then
intKinmonoCount = intKinmonoCount + ThisWorkbook.Worksheets(SheetName_Hagara).Cells(intLoopHagaraRows, 10)
End If
#5 姜 玉華 が約10年前に更新
明細No762は、現場施工材の自動拾いで、画面から入力された数量を明細テーブルに登録します。この時、計算がありません。
CAD読込みの時、下記のソースで、ひねり金物を計算して、現場施工材画面の数量に設定します。
しかし、この部分の計算は、今回CAD読込みで変更しました。部位コードは、”YN”じゃ無く、”YS”に変更されました。
'ひねり金物拾い数量(軒長さ+片流れ棟長さ)
If ThisWorkbook.Worksheets(SheetName_Hagara).Cells(intLoopHagaraRows, 2) = "YN" Then
If ThisWorkbook.Worksheets(SheetName_Hagara).Cells(intLoopHagaraRows, 9) = "軒" Or _
ThisWorkbook.Worksheets(SheetName_Hagara).Cells(intLoopHagaraRows, 9) = "片流れ棟" Then
intHineriCount = intHineriCount + ThisWorkbook.Worksheets(SheetName_Hagara).Cells(intLoopHagaraRows, 10)
End If
'片流れ棟長さ
If ThisWorkbook.Worksheets(SheetName_Hagara).Cells(intLoopHagaraRows, 9) = "片流れ棟" Then
intLength5 = intLength5 + ThisWorkbook.Worksheets(SheetName_Hagara).Cells(intLoopHagaraRows, 10)
End If
End If