ja7awu の回答履歴

エクセルの初歩的な質問ですが、お願いします。 B列に何か文字が入力されると、A列に自動的に今日の日付が入力されるようにしたいのですが、 IF関数を使って 論理式　：Ｂ列に何か文字が入力される 真の場合：ＴＯＤＡＹ 偽の場合：""（空白） としようと思っています。論理式はどのようにすればいいのでしょうか？ Ｂ欄に入力する文字は決まっていません。 それとも、他の方法ですべきでしょうか？

ワークシート上の数値をメッセージボックスで表示させるため、下記のようなVBAを書きました。 Sub 金額表示() Dim a As Long, b As Long, c As Long a = Sheets("logic").Range("P39").Value b = Sheets("logic").Range("O46").Value d = Sheets("logic").Range("O44").Value MsgBox "合計の金額は、" & Format(d, "##,###万円") _ + Chr(&HD) + Chr(&HA) + "○○は、" & Format(a, "##,###万円") _ + Chr(&HD) + Chr(&HA) + "○○○○は、" & Format(b, "##,###万円"), vbInformation, "確認" End Sub ○○部分の文字数や、金額の桁数により、表示される数字の位置ははかなりずれがあります。 これを円で後ろでそろえ統一するような方法はないでしょうか？ 出来れば後ろでそろえても○○の部分も頭をそろえておきたいですが、それが無理なら後揃えだけでも結構です。 よろしくお願いします。

EXCELで、４列（Ａ～Ｄ）仕立ての表があります。Ｄ列に入力されている日付が現在より過去の場合、その行を削除するように作成したいのですが、教えていただけますでしょうか？

ワークシート上の数値をメッセージボックスで表示させるため、下記のようなVBAを書きました。 Sub 金額表示() Dim a As Long, b As Long, c As Long a = Sheets("logic").Range("P39").Value b = Sheets("logic").Range("O46").Value d = Sheets("logic").Range("O44").Value MsgBox "合計の金額は、" & Format(d, "##,###万円") _ + Chr(&HD) + Chr(&HA) + "○○は、" & Format(a, "##,###万円") _ + Chr(&HD) + Chr(&HA) + "○○○○は、" & Format(b, "##,###万円"), vbInformation, "確認" End Sub ○○部分の文字数や、金額の桁数により、表示される数字の位置ははかなりずれがあります。 これを円で後ろでそろえ統一するような方法はないでしょうか？ 出来れば後ろでそろえても○○の部分も頭をそろえておきたいですが、それが無理なら後揃えだけでも結構です。 よろしくお願いします。

エクセル２０００を使用しています。 エクセル表で１ヶ月の支払い明細を作成したとします、 下段に支払い済み合計 　　　支払い予定合計 を作成したとして 明細中の数字を支払い予定は赤色（最初は全て赤色） 支払い済を黒色へ変更とした場合 それぞれの合計が色が変わる毎に 自動的に変わっていく このようなことが出来ないでしょうか

こんにちは。宜しくお願い致します。 　　　Ａ　　　Ｂ　　Ｃ 1　静岡　埼玉　 2　福島　東京　愛媛 3　青森　 4　長崎　徳島　愛媛 5　東京　千葉　 6　秋田　兵庫　大阪 . . . 例えばこういう形で好きな都道府県の上位3つの解答がそれぞれあったとします。（1個の人もいるし、2個の人もいます） これを別のシート（同じシートの違う場所でも構いません）に縦並び1本で出したいときどうしたらいいでしょうか。 ★こういう風にしたい★ 静岡 福島 青森 長崎 東京 秋田 埼玉 東京 愛媛 徳島 愛媛 千葉 兵庫 大阪 . . ※好きな県などが人によって重複していても構いません、また順不同でもいいです。（縦並びのデータに東京が20個あってもよいということ） 形式を選択して貼り付けで行列を入れ替えるではうまくいかないです。 宜しくお願い致します。

エクセル２０００を使用しています。 エクセル表で１ヶ月の支払い明細を作成したとします、 下段に支払い済み合計 　　　支払い予定合計 を作成したとして 明細中の数字を支払い予定は赤色（最初は全て赤色） 支払い済を黒色へ変更とした場合 それぞれの合計が色が変わる毎に 自動的に変わっていく このようなことが出来ないでしょうか

エクセル２０００を使用しています。 エクセル表で１ヶ月の支払い明細を作成したとします、 下段に支払い済み合計 　　　支払い予定合計 を作成したとして 明細中の数字を支払い予定は赤色（最初は全て赤色） 支払い済を黒色へ変更とした場合 それぞれの合計が色が変わる毎に 自動的に変わっていく このようなことが出来ないでしょうか

こんにちはtmgmです。 Excelについての質問です。 色がついているセルの数をカウントして そのセル数を出す っていうことがしたいんですが、 いまいちどう関数を記述していいのかわかりません。 ------------------------------------------------ 例：A1,A2,A3,A4,A5のセルのうち、赤で塗りつぶしてあるセルの数を数えて、その数をB1セルに出す ------------------------------------------------ 何かよいやり方をお分かりの方いらっしゃいますでしょうか？ ご返答よろしくお願いします。

エクセルにて複数のシートを一括でCSVファイルにて 保存する方法ってあるのでしょか？ 教えてください。

初心者です。よろしくお願いいたします。 sheet1の"A2"～"C6"に簡単な表を作りました。 A列に人の名前が入力されています。 そこで、A列の名前が"花子"のデータだけを抽出 してSheet2へコピーしたいのです。 そこで試行錯誤の上、下のような記述をしました。 Sub 抽出() Application.ScreenUpdating = False Sheets("sheet2").Activate Sheets("sheet2").Columns("A:C").Clear With Sheets("Sheet1") .Range("A2").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:="花子", CopyToRange:=Sheets("sheet1").Range("A2"), Unique:=False End With Application.ScreenUpdating = True End Sub しかし、うまくいきません（TT） エラー:400　とかでるんですけど なにがいけなんでしょうか・・。 他にもAdvancedFilterを使うさいに気をつけること がありましたらご指導ください。 (項目行の中のセルが統合されていたりすると うまくいかない・・・とかあるんでしょうか。) よろしくご指導ください。お願いいたします。

WindowsXP環境でExcel2000を使用しています。現在Ａ列に日付、Ｂ列にＡ列の日付を引数として得た曜日を表示させ、条件書式で曜日が土日ならセルの色が赤くなるように設定しています。Ｃ列には始業時間Ｄ列は終業時間がそれぞれ予定としてあらかじめ入力した状態にしてあります。そこで、上記によって取得した曜日が土日にあたるセルの右側、つまりＢ列およびＣ列の値を自動的にもしくはマクロ処理で消去したいのですが、なにか良い方法はないでしょうか？　よろしくお願いします。

WindowsXP環境でExcel2000を使用しています。現在Ａ列に日付、Ｂ列にＡ列の日付を引数として得た曜日を表示させ、条件書式で曜日が土日ならセルの色が赤くなるように設定しています。Ｃ列には始業時間Ｄ列は終業時間がそれぞれ予定としてあらかじめ入力した状態にしてあります。そこで、上記によって取得した曜日が土日にあたるセルの右側、つまりＢ列およびＣ列の値を自動的にもしくはマクロ処理で消去したいのですが、なにか良い方法はないでしょうか？　よろしくお願いします。

WindowsXP環境でExcel2000を使用しています。現在Ａ列に日付、Ｂ列にＡ列の日付を引数として得た曜日を表示させ、条件書式で曜日が土日ならセルの色が赤くなるように設定しています。Ｃ列には始業時間Ｄ列は終業時間がそれぞれ予定としてあらかじめ入力した状態にしてあります。そこで、上記によって取得した曜日が土日にあたるセルの右側、つまりＢ列およびＣ列の値を自動的にもしくはマクロ処理で消去したいのですが、なにか良い方法はないでしょうか？　よろしくお願いします。

ワークシート上の数値をメッセージボックスで表示させるため、下記のようなVBAを書きました。 Sub 金額表示() Dim a As Long, b As Long, c As Long a = Sheets("logic").Range("P39").Value b = Sheets("logic").Range("O46").Value d = Sheets("logic").Range("O44").Value MsgBox "合計の金額は、" & Format(d, "##,###万円") _ + Chr(&HD) + Chr(&HA) + "○○は、" & Format(a, "##,###万円") _ + Chr(&HD) + Chr(&HA) + "○○○○は、" & Format(b, "##,###万円"), vbInformation, "確認" End Sub ○○部分の文字数や、金額の桁数により、表示される数字の位置ははかなりずれがあります。 これを円で後ろでそろえ統一するような方法はないでしょうか？ 出来れば後ろでそろえても○○の部分も頭をそろえておきたいですが、それが無理なら後揃えだけでも結構です。 よろしくお願いします。

こんにちは。 いつもお世話になります。 エクセル（ＸＰ）でシートを１０枚にして作業をしたいのですが・・・、 挿入（Ｉ）→ワークシート（Ｗ）にすると、シート４がシート１の前に入りますよね。 ですが、気にせずＦ４でとりあえずシートを１０枚にします。 この１０枚のシートをシート見出しの順番、シート１，シート２，・・・シート１０のように整列させるにはどうしたらいいのでしょう。 シート見出しをドラッグしかないのでしょうか？ 急いでいます。 よろしくお願いいたします。

Microsoft Excel 2003での質問です。 表を作成しました。 結合セルが複数ある1列に（セル数はまちまち・複数の列には非結合）、連番を振っていく作業をしています。 これをVBAを使って自動化したいのです。 列に連番がすでに入力されている最終行の下のセル（つまりこれから連番が入る空白セル）を選択、 範囲指定し（セル数はまちまちなのでこれは手作業）、 セルを結合させるまではできたのですが、 この結合させたセルに、[（一つ上の結合セル）＋（１）]の値を入力させるにはどうプログラムしたらよいでしょうか？ わかりにくい説明で恐縮ですが、どなたかご教示ください。

教えてください。お願いします。 フィルタをかけてデータを抽出したあと 常に上から10～15行目というように 同じ位置の行を選択するというマクロを組むには どうしたらよいでしょうか？ すみませんが教えてくださ～い。

ワークシート上の数値をメッセージボックスで表示させるため、下記のようなVBAを書きました。 Sub 金額表示() Dim a As Long, b As Long, c As Long a = Sheets("logic").Range("P39").Value b = Sheets("logic").Range("O46").Value d = Sheets("logic").Range("O44").Value MsgBox "合計の金額は、" & Format(d, "##,###万円") _ + Chr(&HD) + Chr(&HA) + "○○は、" & Format(a, "##,###万円") _ + Chr(&HD) + Chr(&HA) + "○○○○は、" & Format(b, "##,###万円"), vbInformation, "確認" End Sub ○○部分の文字数や、金額の桁数により、表示される数字の位置ははかなりずれがあります。 これを円で後ろでそろえ統一するような方法はないでしょうか？ 出来れば後ろでそろえても○○の部分も頭をそろえておきたいですが、それが無理なら後揃えだけでも結構です。 よろしくお願いします。

こんばんはよろしくお願いします。 エクセル2000で、日付が入力されているセルの表示を 7月4日の場合、「 7月 4日」と表示させるにはどうしたらよいのでしょうか？ (つまり十の位に半角スペースが入ってる状態です。) 同様に通し番号も９までの数字も「１」ではなく「　１」と表示させるにはどうすればよいのでしょうか？ いつもありがとうございます。