jcctaira の回答履歴

エクセルの表計算で、検索値が含まれる列を検索後、同じ列の違う行にある数値を返す場合はどのようにすればいいのでしょうか？ ※下表を例としますと、検索値 150 が含まれる１行目のＣ列を検出後、同じ列の２行目に入力されている 4300 を返す場合の関数式を教えてください。 　　　 A 　　 　　B 　　　　　 　 C 　　　 　　 D 1 　 1～50 　51～100 　 101～250 　 251～500 2 　 5000 　　　4500 　　　　 4300 　　　 4000

値のみ貼りつけたい。 すみません。教えて頂いた内容でもう一つ追加で質問をさせてください。 マクロで別ファイルを二つ開いて、マクロファイルがWorkbooks(1)別ファイル二つがWorkbooks(2)、Workbooks(3)になります。Workbooks(2)のデーターをコピーしてWorkbooks(3)に値だけ貼りつけたいのですが、教えて頂けませんでしょうか。 Workbooks(2).Activate Sheets(1).Select Range("A1").Copy Workbooks(3).Activate Sheets(2).Select Range("B1:C1").Select ActiveSheet.Paste　この部分を値のみ貼りつけたいのですが。 PasteSpecial xlPasteValuesをつけてもうまくいかないので、お願いします。

ExcelのChDirで二つのフォルダを指定しても一つめしか認識しない いつもながらExcelのマクロについての質問です。 ChDir "C:\A" Dim 開く As FileDialog Set 開く = Application.FileDialog(msoFileDialogOpen) If 開く.Show = -1 Then 　　開く.Execute End If Set 開く = Nothing ChDir "C:\B" Dim 保存 As FileDialog Set 保存 = Application.FileDialog(msoFileDialogSaveAs) If 保存.Show = -1 Then 　　保存.Execute End If Set 保存 = Nothing これで"C:\A"のフォルダにあるファイルを一つ選び そのファイルをそのまま "C:\B"フォルダにコピーしようとしても コピー先としては 同じ"C:\A"フォルダが表示されてしまいます。 コピー先に "C:\B"フォルダが表示されるようにするためには どうしたらよいのでしょう。 Excel2002およびExcel2003でやってみたのですが 同じ結果でした。 以上、よろしくお願いいたします。

ExcelのChDirで二つのフォルダを指定しても一つめしか認識しない いつもながらExcelのマクロについての質問です。 ChDir "C:\A" Dim 開く As FileDialog Set 開く = Application.FileDialog(msoFileDialogOpen) If 開く.Show = -1 Then 　　開く.Execute End If Set 開く = Nothing ChDir "C:\B" Dim 保存 As FileDialog Set 保存 = Application.FileDialog(msoFileDialogSaveAs) If 保存.Show = -1 Then 　　保存.Execute End If Set 保存 = Nothing これで"C:\A"のフォルダにあるファイルを一つ選び そのファイルをそのまま "C:\B"フォルダにコピーしようとしても コピー先としては 同じ"C:\A"フォルダが表示されてしまいます。 コピー先に "C:\B"フォルダが表示されるようにするためには どうしたらよいのでしょう。 Excel2002およびExcel2003でやってみたのですが 同じ結果でした。 以上、よろしくお願いいたします。

数値に変換されたセルの数をカウントしたい Excel2007を使っています 添付図のN3：AR31には数式が入っています このうち数値に変換されたセルの数をカウントしたいのですが　単にCOUNT関数では全部載せるが該当してしまいます 何か工夫すればできそうに思うのですが　その方法がわかりません どなたかアドバイスよろしくお願いします

Ｅｘｃｅｌ２００７でコピーのマクロの書き方を教えて下さい。 シートの左側に、毎年３種のデータ(例:イ,ロ,ハ)が入っています。 この毎年の(イ)を同一シートの右側に、５年間連続に並べるべく、コピーをしたい。 毎年　行数は同じです。 　　H22　　 H21　　 H20　　コピー先→　 H22 H21 H20　５年間連続で　 　イロハ　　イロハ　　イロハ　　　　　　　　 イ　 イ　 イ 以下のようなマクロを書いたところ、 　　実行時エラー　　1004 　　　　Range メソッドは失敗しました。　　とのエラーで動きません。 当方、ごく初心者で、ほとんど何も解っていない、老人です。 是非教えて下さい。　よろしくお願い致します。 エラーとなるマクロです。 Sub Macro1() Dim Copymoto As Integer Dim Copysaki As Integer Dim i As Integer Copymoto = 41　　'コピー元列　例　41 44 47 50 54　の５年間のデータを Copysaki = 67 　　　'コピー先列　例 67 68 69 70 71　(イ)のデータを連続で並べたい For i = 1 To 5 Range("cells(15,Copymoto):cells(303,Copymoto)").Select Selection.Copy Range("cells(15,Copysaki)").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Copymoto = Copymoto + 3 Copysaki = Copysaki + 1 Next i End Sub

イベントプロシージャ『 Worksheet_Change 』の対象セルを『 コピー貼付 』の際 どんな方法で貼り付けてもマクロがフリーズすることがなくなる方法をご存知の方が いらっしゃいましたら、是非その方法を教えて下さい。 『 Worksheet_Change 』対象セルの『 コピー貼付 』の際、ツールの『 編集 』から 『 貼り付け 』の手順で『 Worksheet_Change 』対象セル宛に情報を貼り付けてみた 場合は特に問題なく情報が貼り付いてくれます。 『 Ctrl+V 』で貼り付けた場合も問題なく情報が貼り付いてくれます。 しかし、コピー後に貼り付け先のセルを右クリックして『 形式を選択して貼り付け 』の手順での 貼り付けをしようとすると、必ず決まってマクロがフリーズしてしまいます。 そのため、その度にウィンドウ右上の閉じるボタン『 X 』をクリックして『 保存しますか？ 』を 『 キャンセル 』してマクロのフリーズを解除している状況です。 コピー元のセルと貼り付け先のセルは共にセル結合されている状態ですが、この『 セル結合 』は マクロのフリーズとは無関係のことと思われます。 何か良い解決策をご存知の方、どうか宜しくお願いします。

イベントプロシージャ『 Worksheet_Change 』の対象セルを『 コピー貼付 』の際 どんな方法で貼り付けてもマクロがフリーズすることがなくなる方法をご存知の方が いらっしゃいましたら、是非その方法を教えて下さい。 『 Worksheet_Change 』対象セルの『 コピー貼付 』の際、ツールの『 編集 』から 『 貼り付け 』の手順で『 Worksheet_Change 』対象セル宛に情報を貼り付けてみた 場合は特に問題なく情報が貼り付いてくれます。 『 Ctrl+V 』で貼り付けた場合も問題なく情報が貼り付いてくれます。 しかし、コピー後に貼り付け先のセルを右クリックして『 形式を選択して貼り付け 』の手順での 貼り付けをしようとすると、必ず決まってマクロがフリーズしてしまいます。 そのため、その度にウィンドウ右上の閉じるボタン『 X 』をクリックして『 保存しますか？ 』を 『 キャンセル 』してマクロのフリーズを解除している状況です。 コピー元のセルと貼り付け先のセルは共にセル結合されている状態ですが、この『 セル結合 』は マクロのフリーズとは無関係のことと思われます。 何か良い解決策をご存知の方、どうか宜しくお願いします。

EXCELで○日以降のデータをカウントする方法。 EXCELで週報を作るとします。 累積のデータ（A)があり、別シート（B)で○月○日～○月●日の内容としてレポートを作成しようとしています。 それで、（B)の日付のセル２か所を変えることで、その日付の間のデータを各項目別に集計する数式を組もうとしています。 乏しい知識でIF関数をネストしようとしたのですが、エラーが出て進みません。 ２つ教えてください。 (1)質問１ データ（A)には来場されたお客様単位で来場日・属性・購買行動等を一つの行に入力してあります。 また、来場日の時系列順に入力してあり、顧客の属性（新規,リピータ）があります。 ○月○日～○月●日の間の新規客数をカウントする方法はありますでしょうか。 (2)質問2 購買行動をコードで入力する欄があります。 複数のサービスを選ばれる場合があるので、５つの欄が用意されています。 8/1 新規　○○様　A・B・D・E 8/2 新規　●●様　A・D 8/3 リピータ ●●様　A・C・D こんな具合です。 ○月○日～○月●日の間のAのサービスが提供された回数を数えたいのですが、 どのようにしたらよいでしょうか。 参照する範囲の式を変更していままで対応していたのですが、 職務の引き継ぎがあり、その人はExcelチンプンカンプンなので できれば週報のシートの日付を変えるだけで完成するように作り変えようとしています。 皆さまのお知恵を貸してください。宜しくお願いします。

EXCELで○日以降のデータをカウントする方法。 EXCELで週報を作るとします。 累積のデータ（A)があり、別シート（B)で○月○日～○月●日の内容としてレポートを作成しようとしています。 それで、（B)の日付のセル２か所を変えることで、その日付の間のデータを各項目別に集計する数式を組もうとしています。 乏しい知識でIF関数をネストしようとしたのですが、エラーが出て進みません。 ２つ教えてください。 (1)質問１ データ（A)には来場されたお客様単位で来場日・属性・購買行動等を一つの行に入力してあります。 また、来場日の時系列順に入力してあり、顧客の属性（新規,リピータ）があります。 ○月○日～○月●日の間の新規客数をカウントする方法はありますでしょうか。 (2)質問2 購買行動をコードで入力する欄があります。 複数のサービスを選ばれる場合があるので、５つの欄が用意されています。 8/1 新規　○○様　A・B・D・E 8/2 新規　●●様　A・D 8/3 リピータ ●●様　A・C・D こんな具合です。 ○月○日～○月●日の間のAのサービスが提供された回数を数えたいのですが、 どのようにしたらよいでしょうか。 参照する範囲の式を変更していままで対応していたのですが、 職務の引き継ぎがあり、その人はExcelチンプンカンプンなので できれば週報のシートの日付を変えるだけで完成するように作り変えようとしています。 皆さまのお知恵を貸してください。宜しくお願いします。

エクセルで質問です。 添付のようなエクセルで、行が2000ほど続く表に関して、 データのカウントをしたいと思っています。 各セルは0か1の値です。 添付を例にすると、以下のようなことを調べたいのですが、 どのような方法があるでしょうか。 BDEに1が入っている行の数→　　　2 CEに1が入っている行の数→ 2 ACEに1が入っている行の数→ 2 ACDEに1が入っている行の数→ 1 ABCDEに1が入っている行の数→ 1

エクセル2003についてご質問です。目的のデータを抽出して数量合計を出すVBAをおしえてください。 VBAは初心者で、マクロ自動記録を使っているのですが、自動記録で必要なデータを貼りつけるまでの作業はできるのですが、それ以降の下記の作業がVBA記述でないとできそうになく、どうしたらいいのか分からないので教えてください。 Aの列に入荷日付が入ってます。1月から今日までの日付が延々と入力されてます(日付は順番に並んでない時もあります)。 B列には商品名、C列には数量が入ってます。 マクロを実行して、一番最新の日を抽出して、その中でB列の商品が「事務用品」となってるセルの、C列の数量の合計数をメッセージボックスで出したいのですが。どうしたらいいのでしょうか？ また、それとは別に任意の日付を指定して(日付入力用のセルに入力して)、B列「事務用品」の数量合計をメッセージボックスで出す方法もおしえてください。 下記は例です。実際は各日にはもっとたくさんのデータが入力されています。日によってデータ数はバラバラです。 よろしくご指導ください。 A......................B.....................C 【日付】.............【商品名】.........【数量】 1/5..................お茶菓子..........2 1/5..................事務用品.........3 1/5..................事務用品.........5 1/6..................事務用品.........7 1/6..................事務用品.........2 1/7..................ホース..............1 1/8..................事務用品.........4 1/7..................懐中電灯.........1 1/6..................ヘルメット..........3 ・ ・ ・(間の期日を省略します・・) ・ ・ 8/24................事務用品..........4 8/25................事務用品..........6 8/24................ドライバー..........1 8/26................事務用品..........3 8/26................事務用品..........7 8/26................コーヒー他..........5

EXEL関数またはマクロでA,B,Cを数値に変換してその和を出すには こんにちは。EXEL関数をほとんど使ったことがない初心者です。 各人に対してA,B,C,Dの評価が複数ついている、下のようなデータがあります。 　　　　　1　2　3　4　5　6　7　合計 山田太郎　A　A　B　B　C　A　D　28 山田花子　B　C　B　C　D　A　C　24 . . . 　 これをA=5、B=4、C=3、D=2と変換し、さらにその数値の和を"合計"セルに表示させる方法を教えていただけないでしょうか。 自分なりにいろいろ調べてみたところ、IFやVLOOKUPを用いてA,B,C,Dを個々に数値に変換して、さらにそれを足すという方法まではたどり着きました。 しかし、変換と集計をいっぺんにできたらいいなと思っています。 それについても調べてみたのですが、なかなかよい方法がみつかりません。 方法や、考え方のヒントや、調べ方のヒントや、またはそんなことはできないというご指摘でもかまいません。 なにかアドバイスいただければ嬉しいです。 よろしくお願いします。

Excelのセル移動について データ入力の仕事をしていてアンケート入力の仕事をしています。 今現在している仕事は１人５０問ほどのアンケートをExcelに入力しています。 １人分のアンケートを横の列に入力していくので Enterを押すと右のセルに移動するようにしているのですが 質問点は アンケートは５段階のうちどれかに丸をつけるタイプで ５０問全て数字を１つずつ入力する形です。 今は、テンキーを使って１つ数字を入力してEnterを押しての繰り返しです。 で、ふと思ったのですが 例えば https://cp.cocacola.jp/top.php?hn=cp03 このコカコーラのキャンペーンサイトでは 左上にシリアルナンバーを入力する箇所があるのですが （ペットボトルについているシールの裏にナンバーがありますが） 上８桁下８桁の１６桁を入力するのですが 上８桁の箇所をクリックして８桁入力すると 自動的に下８桁の部分に 点滅している縦線が移動して、そのまま入力してもそこに入力されるようになるのですが これってExcelで設定か何かで適用することはできないでしょうか？ そうするとEnterを押さなくてもよくなるので ５０問入力のアンケートデータでは 数字Enter数字Enterの繰り返しだと ５０回近くキーを押す回数が減らせるので時間短縮にもなって助かります。 もし方法ありましたら教えてください。

エクセルで選択範囲内の半角空白を取り除きたい。 エクセルの各セルに歌のタイトルが入っています。 ところがところどころに半角スペースが入ってしまっているためこれを取り除きたいのですが すべてを取り除くのであれば選択範囲内であっても「検索置換」を使えばできますが 条件として日本語に混在するスペースのみをとり除き、 英文の単語間にあるものはそのままにしたいのです。 基本的に、全角にはさまれた半角空白のみを対象として、 半角にはさまれた空白はいじらないことになります。 （いじらない場合として半角数字も該当してしまいますが、ほとんど該当がないものと考えています） 関数、マクロ等でなにかいい知恵がありましたら教えてください。

MS EXCELのCPU利用率 エクセルでマクロを使ってDATA整理をしたり、SUMPRODUCT関数を使用すると、パソコンの動きが異常に遅くなることがありますが、その時のCPU利用率をみると、いつも５０％です。 もっと早く計算させたいのですが、CPUの利用率を上げることはできるでしょうか? よろしくお願い致します。

エクセルと関数について 売店チケット 件数 料金 性別 6000 2 6000 男 6000 0 6000 女 上記のような表をエクセルで作成しました。 左からＡ列　売店チケット　Ｂ列　件数　Ｃ列　料金　Ｄ列　性別です。 売店チケットは3000円単位で、6000円だと2件になります。 でも、手打ち入力なので、ミスすることも多く、Ｂ列の0件はエラーで、正しくは2件なのです。 そこで質問なのですが、関数で もし、Ａ列に金額が入っていれば（ゼロ以外）、Ｂ列の0は数字上 おかしいので、エラーを表示するような数式を作りたいです. 例えば、Ｅ列の1行目に「エラーですよ」的な表示はまとめてできますか？ Ｂ列は1行目から3000千行目位までデータが入っているとします。 売店チケットに金額の表示があるのに、Ｂ列が一件でもゼロだと間違いなのです。 うまく表現できていないかもしれませんが、よろしくお願いします。

エクセルで例えば！あいうえおかきくけこ”と文字入力されていたとします。右から６番目の文字以降の文字を抽出する関数はありますか？答え”あいうえお”となるように。

Excel VBAを使って、あるセルに入力したコードに対応する品名を表示しようとしています。 １．コードと品名のマスターテーブルがsheet1にあります。 ２．sheet2のあるセルにコードを入力したら横のセルにsheet1から品名を引っ張って表示します。 以上をsheet2のモジュールとしてworksheetのchangeを使ってコードしました。すると、以下の問題点 があり、ご教示下さい。当方、8年前に一回だけVBとC++Builderを使って統計処理プログラムを 組んだことがありますが、元DOS系であり、ソフト自体久しぶりですっかりさび付いています。 １．コードを入力するとchangeがかかってモジュールに飛んで、処理はできます。しかし、 　プログラムで品名を書き込むと、また、changeが発生して、処理を中断して、モジュールを抜け、モジュールに再突入してくる。 ２．とりあえず、staticのフラグでこの処理を切り分けましたが、正直、ダサいです。 ３．名前を書き込む前に、changeイベントを禁止にすればと思うのですがその方法もわかりません。 ４．普通、このような目的の場合、どのような方法をとるのでしょうか。 よろしくお願いします。

Aフォルダの中に A002_1 A002_2 A002_3 という3つのフォルダが存在するのですがこの３つの フォルダ名のA002部分のみA007に一括変換したいのです。 つまり A007_1 A007_2 A007_3 としたいのですがVBAではどのようにすればいいのでしょうか？