[過去ログ] Excel総合相談所 136 (1002レス)
1-

このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
37
(1): 2019/08/03(土)01:51 AAS
>>24
=TEXT((IF(A1>TIMEVALUE("22:00"),A1,"22:00"))+IF(B1>TIMEVALUE("5:00"),"5:00",B1),"hh:mm")
38
(1): 2019/08/03(土)01:53 AAS
すまんちょっと抜けてた
=TEXT((1-IF(A1>TIMEVALUE("22:00"),A1,"22:00"))+IF(B1>TIMEVALUE("5:00"),"5:00",B1),"hh:mm")
39: 2019/08/03(土)13:54 AAS
アンティルとドゥーンを組み合わせた全く新しいループを発見した
40: 2019/08/03(土)14:14 AAS
カツドゥーン、天ドゥーン、親子ドゥーン
41: 2019/08/03(土)14:39 AAS
悪ぃけど暇じゃねぇんだ 構ってやれねぇ
42
(1): 2019/08/05(月)01:53 AAS
【1 OSの種類         .】 Windows10
【2 Excelのバージョン   】 Excel2019
【3 VBAが使えるか    .】 いいえ
【4 VBAでの回答の可否】 否

もとから入っているユーザー設定リストを削除、もしくは無視させる方法はありませんか?
43: 2019/08/05(月)02:16 AAS
できないですね
44: 2019/08/05(月)07:56 AAS
どなたかExcelの神髄ってサイトの総合練習問題2を解説していただけないでしょうか?
45: 2019/08/05(月)07:58 AAS
せめてリンクかなんか貼ってくれw
46
(1): 2019/08/05(月)08:08 AAS
https://excel-ubara.com/excelvba1/EXCELVBA326.html

特にわからないところがなぜ合計を初期化するのか?

数値型への変換、指定数値以上合計に加算の3つのコードの意味です。
47: 2019/08/05(月)08:09 AAS
よろしくお願い致します。
48
(1): 2019/08/05(月)08:16 AAS
>>46
カスみたいなサイト。もう見るな

lngIn = strIn   '数値型への変換
変換しても何の意味もない
数値型の「確認」にして数値型でなければ終了という処理にしなければならない

lngTotal = 0   '合計を初期化
これは必要
明示的にやっておいて損はない、というかやらないと大抵良くない事になる。俺も絶対にする
49: 2019/08/05(月)08:18 AAS
>>42
コントロールキー押しながらじゃダメ?
50
(3): 24 2019/08/05(月)08:34 AAS
>>36 37
ありがとう。

早速試してみたよ
しかしながら問題が・・

A1:AM9:00 B1:翌AM9:30

この時は、お二人が教えてくれたのでできました。
でも
A1:9:00 B1:18:00
という場合にも、深夜帯が無いのにC1:7:00となってしまう。
ここはC1:0:00となってほしい。
省2
51
(3): 2019/08/05(月)11:05 AAS
>>50
>>27,33 をよく見てほしい。 A1セルには当日の時刻、B1セルには翌日の時刻として書いています。
>>36にも B1+1 で、B1の時刻は”翌日の”という意味になる と書いています。
B1の時刻は翌日であるという前提なので、18:00の場合は 翌日の18時 とみなして計算してるので、
当日の9時〜翌日の18時の間の22時〜翌日の5時である7時間を返すのは当然。

B1も当日の時刻が入力されるのであれば、当日と翌日の境の時刻を明示する必要があります。
例えば、勤務開始時刻は9時、かつ
勤務開始時刻から24時間を超える終了時刻(B1)はありえない、ということであれば、
B1がとりうる当日の時刻は 9:01〜23:59 で、翌日の時刻は 0:00〜8:59 ということになります。
計算式の中の B1+1 の +1 の部分をB1の値によって +1 するかしないかを調整すればいいです。
省1
52: 51 2019/08/05(月)11:13 AAS
>>51
当日9時〜翌日9時という24時間勤務がありうるのであれば、
>>51で書いた
B1がとりうる当日の時刻は 9:01〜23:59 で、翌日の時刻は 0:00〜8:59 ということになります。 を
B1がとりうる当日の時刻は 9:01〜23:59 で、翌日の時刻は 0:00〜9:00 ということになります。 に変更し、
>>51の最後の行は
計算式の中に2か所ある B1+1 を B1+(B1<=TIMEVALUE("9:00"))*1 に変えてみてください。 に変更します。
53
(4): 51 2019/08/05(月)11:38 AAS
>>50
念のため、A1(開始時刻)はかならず当日の時刻になりますか?
ありえるのかどうかわかりませんが、深夜0時以降の開始時刻を指定した場合、
現在の計算式では、当日でのA1の時刻〜終了時刻(B1)の時間で計算してしまいます。
例えばA1に1:00、B1に6:00と入力すると、本来なら5:00となるべきところ、7:00という
計算結果になります。
54: 2019/08/05(月)12:24 AAS
>>48
返信ありがとうございました。
まだVBAをかじり出した程度なので手探り状態です。構文を段階的に学べるおすすめのサイト、書籍などはありますか?
55: 24 2019/08/05(月)12:52 AAS
>>53
何度も詳細にありがとうございます
A1は確実に当日です。
56: 24 2019/08/05(月)13:08 AAS
>>53
=MAX(MIN(29/24,B1+(B1<=TIMEVALUE("9:00"))*1+((B1+(B1<=TIMEVALUE("9:00"))*1)<A1))-MAX(22/24,A1),0)

この式に変えてみましたが、c1は0:00になりますね・・・
また、これは始業を9:00に固定した場合だと思うのですが
始業は当日の範囲で0:01〜23:59までばらばらです。
1-
あと 946 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.014s