[過去ﾛｸﾞ] Excel総合相談所 136 (1002ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
51(3): 2019/08/05(月)11:05:33.82 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
87(4): 2019/08/06(火)21:30:38.82 AAS
【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
A列からC列までの合計とＥ列からＧ列の合計が間違っていたら
メッセージを出す関数を作っています。
=Ｉｆ (SUM(A1:C1)=SUM(E1:G1),"","エラーメッセージ")
まではあっさり書けたのですが、
行が、例えば100くらいになった(A100:C100とE100:G100)場合、
どうすればいいのでしょう。
省6
155: 2019/08/11(日)23:25:25.82 AAS
>>154
ここは昔からExcelの質スレだよ
スレチの質問でも多めに見てくれる人はいるよ
でもそれは当然じゃないよ
169: 2019/08/12(月)10:54:18.82 AAS
>>168
NAは見つからないエラー
>>165
＞答えが同じ文字でも複数存在するからですよね
違う
存在しないからエラーが返っている
226: 2019/08/16(金)15:11:16.82 AAS
参考書なら個人の方針とか関係なくどう書かれたコードかという説明は書くべきじゃないかな
241(1): 2019/08/17(土)21:41:58.82 AAS
>>240
それだけ読めば十分初心者じゃなくなってると思う
VBAの機能を何もかも全部覚えるのは不可能だから、あとはVBAでやりたい仕事ができたら、目的に応じてネット検索すればいい
328(1): 2019/08/21(水)12:21:46.82 AAS
>>326
計算のルールがまったくわからん
何と何をどう足してるんだ
404(2): 2019/08/26(月)19:35:45.82 AAS
>>401です。追記です。
パスワードなしの場合は，以下のように記述しています。
Sub 転記用シート一括非表示()
Dim s As Worksheet
For Each s In Worksheets
If InStr(s.Name, "転記用") > 0 Then
s.Visible = False
End If
Next s
End Sub
省8
422(1): 384 2019/08/27(火)20:40:32.82 AAS
>>383,418
これでどうでしょう。
=IF(A1=1,OFFSET(A3,1,MATCH(1,A3:M3,0)-1),"")
=IF(A1=1, ,"") の部分は説明不要ですね。
OFFSET(A3,1,MATCH(1,A3:M3,0)-1)の解説
OFFSET(A3,1,□) で、A3セルを基準に１行下、□列右のセルを指定したことになります。
□はどうやってもとめるか・・MATCH関数の出番です。
MATCH(1,A3:M3,0) で、A3:M3セル範囲（１行×１３列）の中から値が１のセルが何番目に
あるかを求める関数です。例えば、D3セルが１だったらMATCH関数の値は４になります。
このままではA3セルを基準に1行下4列右のセル＝E1セルを指定してしまうことになるので
省6
429: 2019/08/28(水)13:27:08.82 AAS
>>427
支払済を試しに半角英数字に変えてみては？
474: 471 2019/08/30(金)19:39:32.82 AAS
>>472
すみません。Ａ列でした
それぞれのＣＳＶファイルはＡ列～Ｇ列に文字が記入してあります。
502: 2019/09/03(火)00:30:31.82 AAS
>>499です。
>>501
ありがとうございました。
無事，目的のものができました。
508: 2019/09/03(火)14:26:10.82 AAS
まだだめだ
ちょっと考え直してくる
誰かたのむ
605: 2019/09/09(月)20:43:57.82 AAS
>>604
計算したら確認票を削除するんだろう？だから消す前に値貼り付けすればいいんじゃないのか
672: 2019/09/14(土)13:54:28.82 AAS
>>671
地域別で見られるようにしたのがシート2なら俺にはそれが地域別だと思えるが別に好きにすりゃいいんじゃね
676(2): 2019/09/14(土)22:37:50.82 AAS
Ｅ列～Ｚ列で１行目以外（２行目以降）で空白セルしかない列を削除するコードを教えてくださいm(_ _)m
742: 2019/09/16(月)15:09:27.82 AAS
>>739
速度無視単純さ重視
dim r as range
for each r in range("a1:a10")
if r.value like "*行程№*" then
>>719のSelection.をr.に変えたやつ
end if
next
782(1): 2019/09/17(火)15:04:48.82 AAS
>>779
seleniumはもう死んだのだ…
seleniumはほぼ回答付かないので恐らく回答来ないと思う
知恵袋の方が回答付くかもよ
836: 2019/09/22(日)09:16:32.82 AAS
画像をサーバーから消しといた。
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.053s