[過去ﾛｸﾞ] Excel総合相談所 136 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
419(2): 2019/08/27(火)18:35 AAS
418の続きです。
カレンダーの日付で、●日の時のメニューを、別シート（配送表）に反映させたいんです。
カレンダー様式は曜日が固定されていて、月によって●日という位置が変わるんです・・・
月 火 水 木・・・
１ ２ ３ ４ もあれば
月 火 水 木・・・
31 １ ２ ３ などもあり、
日付と一致するセルの下のメニューを引っ張りたいんですが、式で可能なんでしょうか。
省1
420(1): 2019/08/27(火)18:58 AAS
↓だと半分ぐらいが削除されるのですが、なぜか削除されない行もあります。
セルにはスペースも何も入っていないで。
原因と解決方法を教えてください。
Sub Macro2()
'シート名「＊＊＊」のＣ列に空欄のセルがあれば、その行を行ごと削除して詰める
Sheets("＊＊＊").Select
For r = Cells(Rows.Count, "C").End(xlUp).Row To 2 Step -1
If Cells(r, "C").Value = "" Then
Rows(r & ":" & r).Delete
End If
省2
421: 2019/08/27(火)19:51 AAS
>>420
For r = Cells(Rows.Count, "C").End(xlUp).Row To 2 Step -1
If Cells(r, "C").Value = "" Then
debug.print r&"行目の中身："&Cells(r, "C").Value
Rows(r & ":" & r).Delete
End If
Next r
って感じでコンソールに出力すると良いよ
他にもF8のステップインって機能がある
一行一行見ていけば、変な行がわかる
422(1): 384 2019/08/27(火)20:40 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
423(2): 2019/08/28(水)08:20 AAS
>>419
俺だったら、日付とその日のメニューを
左右2列に並べたシートを作り
それを元にカレンダー作るけどね
休業日のシートも作って
それもカレンダーに反映させればいいし
万年カレンダーでググればヒントになるの見つかるよ
424(2): 2019/08/28(水)09:09 AAS
>422 ありがとうございます！自分の知らない関数でした！
確かに、これだといけますね！
範囲を複数にまたがる時ってどうしたらいいんでしょうか？
カレンダーなので、行が変わるんです。「Ａ３：Ｍ３」だけでなく、
「Ａ１０：Ｍ１０」も みたいなイメージです。
>423
横に書くデータ入力シートを作って、それを反映させるって意味ですね？
入力する素人おばちゃんが、縦と横、目を回さずに間違いなく入力できたら
いいんですが・・・一度話してみます！
色々とありがとうございます。
425: 2019/08/28(水)12:15 AAS
>>424
横じゃなくて縦並び
手帳と同じ
日付,メニュー
2019/8/28,オムライス
2019/8/29,ハンバーグ定食
って感じ
426: 2019/08/28(水)12:50 AAS
カレンダー作る時
日付を“1”で入れるか“2019/9/1”で入れて
書式にd入れるのは見かけ同じで意味が違う
後者の方が応用させやすい
427(6): 2019/08/28(水)13:19 AAS
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 少し
【4 VBAでの回答の可否】 不可
あるシートのＡ5に、=IF(A50>0"支払済","未") という関数が入っており、それがＺ列まであります。
それぞれ、50行目に金額が入っていれば 支払済、なければ 未 と表示されるようになっています。
このＡ5からＺ5に、「値が 支払済 なら背景色変更」という条件付き書式を設定しようとしているのですが、
うまくいきません。
なぜか「値が 未 なら背景色変更」というのはできます。
「支払済」という文字が間違っているとは思えません。「済」という文字のコードに問題が？とか思って
省3
428(1): 2019/08/28(水)13:22 AAS
>>427
それって、色を変える書式の条件を A50>0 にすればいいだけのような
429: 2019/08/28(水)13:27 AAS
>>427
支払済を試しに半角英数字に変えてみては？
430: 2019/08/28(水)16:05 AAS
>>427
絶対参照にしてたというオチはないだろうか
431: 2019/08/28(水)16:12 AAS
>>427
条件式に間違いは無いのでは？
ただ、それに対応する書式がきちんとしていないとか？
>>428
普通はそうだよね。
強いて言えば、A50に"金額"という名前を付ける方が後で修正のときに迷わない。
432(1): 2019/08/28(水)16:20 AAS
細かいこというけど、A50が空白かどうかの判定は
A50＞0,"支払済",“未”
じゃなくて
ISBLANK(A50),"未","支払済"
433: 2019/08/28(水)16:28 AAS
>>427
結局、支払済と未でそれぞれの背景を何色にしたいねん？
それを書かないとなんともなあ。
434(3): 384,422 2019/08/28(水)17:47 AAS
>>424 簡単に作ってみました。
>>423さんが書いてるような、入力のためのシートと週間カレンダー形式のシートで構成しています。
両方のシートを画面イメージでアップしました。
https://i.imgur.com/kVRc5G6.png
曜日固定のカレンダーに日付を設定するのは第１週の最後の曜日の日付を求める計算式が要です。
Ｂ１セルとＣ１セルに入れた年と月とＩ４セルの計算式で求めています。
Ｉ４セルの計算式の説明は割愛します。C4:I4、C7:I7、・・・のセルは計算式で日付を出しています。
セルの書式で日付のうちの日部分だけ表示するようにしています。Ｉ４セルだけ年月日を出してます。
入力シートから日付をキーとして引用する計算式は、図の下の方のＦ５のセルの
=IFERROR(VLOOKUP(F4,入力!$A$2:$C$50,2,FALSE)&"","") です。
省4
435: 2019/08/28(水)19:59 AAS
>>427
色変える条件式どう書いたか晒してみ？
>>432
それだと数字以外でも支払済みになる
436: 2019/08/28(水)21:24 AAS
>>408
返事が遅くなってしまいましたが、できました！
ありがとうございます！
437(3): 2019/08/28(水)22:21 AAS
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 勉強中
【4 VBAでの回答の可否】 可
数式や関数がたくさん入っていて非表示になっているシート1があるとします。
VBAで、このシートのコピー（各セルの値はすべて値を貼り付け的な処理をして関数や数式は残さない）
を別ファイルとして保存することは可能でしょうか？
可能なのかどうか、また、できればそのコード（長くなるならヒントだけでも）を教えてください。
438: 2019/08/28(水)22:44 AAS
>>437
可能です。
マクロの記録でもできそう。
上下前次1-新書関写板覧索設栞歴
あと 564 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.011s