エクセルの学校：全文検索：Hyper Estraier：時間の計算

Results of 1 - 1 of about 657 for 時間の計算 (0.002 sec.)

[[20080630163838]]: #score: 5666; @digest: caa1bc0bedd3b87fc66f7b70299eca56; @id: 38828; @mdate: 2008-07-02T13:31:46Z; @size: 2902; @type: text/plain; #keywords: textbox78 (79949), textbox77 (77615), textbox82 (55257), textbox76 (52488), 間te (28711), textbox54 (20721), textbox53 (19644), textbox49 (19644), textbox50 (18928), 積時 (14551), timevalue (10034), commandbutton49 (7748), commandbutton48 (7748), commandbutton46 (7748), commandbutton47 (7323), 計時 (6223), 示ok (5863), 両手 (4621), く足 (3931), 累積 (3862), format (2606), 小計 (2531), 輩方 (2157), exvba (2009), 時間 (1570), hh (1532), nn (1443), text (1386), double (1362), 始時 (1189), 先輩 (1149), 了時 (1076); 『時間の集計について』（ExVBAかじりはじめ）
フォーム上で時間の集計をしたいのですが、構文は以下の通りです。 Private Sub CommandButton46_Click() TextBox49 = Format$(Now(), "hh:nn") End Sub Private Sub CommandButton47_Click() Dim t1 As Double Dim t2 As Double TextBox50.Text = Format$(Now(), "hh:nn") t1 = TimeValue(TextBox49.Text) t2 = TimeValue(TextBox50.Text) TextBox78.Text = Format$(t2 - t1, "hh:nn") TextBox76.Text = Format$(TextBox78 + TextBox77 + TextBox82, "hh:nn") End Sub Private Sub CommandButton48_Click() TextBox53 = Format$(Now(), "hh:nn") End Sub Private Sub CommandButton49_Click() Dim t3 As Double Dim t4 As Double TextBox54.Text = Format$(Now(), "hh:nn") t3 = TimeValue(TextBox53.Text) t4 = TimeValue(TextBox54.Text) TextBox77.Text = Format$(t4 - t3, "hh:nn") TextBox76.Text = Format$(TextBox78 + TextBox77 + TextBox82, "hh:nn") End Sub TextBox49:開始時間 TextBox50:終了時間 TextBox78=50-49:小計時間 TextBox53:開始時間 TextBox54:終了時間 TextBox77=54-53:小計時間 TextBox76:累積時間以上の様になるのですが、小計時間は表示OKなのですが、累積時間(TextBox78+TextBox77)がうまく足されません。 TextBox76.Text = Format$(TextBox78 + TextBox77 + TextBox82, "hh:nn") のようにしてみましたが、うまく足されません。どうすればいいのでしょうか?先輩方、お知恵をお願いいたします。 ---- 時間の計算は両手の指に余りますから、ようわかりまへんねんけど timevalue(textbox78)+timevalue(textbox77)+timevalue(textbox82),"hh:nn" としてみたらどうなります? （弥太郎） -------------------------------------------------------------------------- 『時間の集計について』（ExVBAかじりはじめ）アドバイスありがとうございます。 TextBox76.Text = Timevalue(TextBox78.Text) + Timevalue(TextBox77.Text) + Timevalue(TextBox82.Text), "hh:nn") にしましたが、コンパイルエラーが出ます。対処方法を教えてください。お願いします。 ---- TextBox76.Text = Format$(Timevalue(TextBox78.Text) + Timevalue(TextBox77.Text) + Timevalue(TextBox82.Text), "hh:nn") というアドバイスだったと思いますが? (ROUGE) アドバイスありがとうございました。おかげで、うまく動くようになりました。（ExVBAかじりはじめ） --------------------------------------------------------------------------- アドバイスありがとうございました。さらに質問ですいません。 TextBox76が累計時間 TextBox78、TextBox77、TextBox82が小計時間になっていますが、小計時間と累積時間をCommandButtonでワークシートに保存するようにしていますが、ここで、TextBox78、TextBox77には時間が入っていますが、 TextBox82には未入力時にワークシートに飛ばすと、00:00とワークシート上に表示されてしまいます。00:00と表示しないようにするには何か構文を足せばよいのでしょうか・・?次から次へ質問ばかりですいませんです。よろしくお願いいたします。 ---- ワークシートに飛ばす前に条件を入れて、 0なのか0以外なのか確認してみるのはどうでしょう。 (HANA) ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/200806/20080630163838.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ