squip の回答履歴

エクセル入門者です。 お聞きしたいのは， (1)　入門～応用まで，マクロをわかりやすく説明しているおすすめのＵＲＬがあればおしえてください。 (2)　具体的には，１つのセルに，たとえば「１２３４５」と入力されているものを「１」「２」「３」「４」「５」の数字が，１つのセルに１つだけ入るようにしたいんです。 　かつ，「１２３４５」の次の行にはまた別の５桁の数字があり，それもずっとそういう作業をするマクロを組みたいのです。 (1)，(2)どちらかでもけっこうですので，どなたかご教授ください。

VBAマクロでシートをダブルクリックするたびに「２００８年1月」⇒「２００８年2月」・・「２００９年1月」・・。となるようにマクロを組みたいのですがどのようにやればいいですかね？初歩的で抽象的な投稿ですがもしよければご教授ください。よろしくお願いします。

Excel2003です。 [入力用][表示用]という二つのシートにある一覧表を作っています。 [入力用]のB3セルとC3セルのいずれかを[表示用]のB2セルに自動表示させたいと思っています。 その条件は以下のとおりです。 条件1：入力用!B3と入力用!C3共に文字列が存在する場合は入力用!C3を[表示用]B2に表示させる 条件2：入力用!B3のみに文字列が存在する場合（入力用!C3は空白）は入力用!B3を[表示用]B2に表示させる 条件3：入力用!B3と入力用!C3共に文字列が存在しない場合は[表示用]B2は空白にする ここまでは何とかしたいです。 願わくば可能であればもう一つ・・・ 条件4：入力用!B3が空白で入力用!C3に文字列が存在する場合は何らかのエラーを出す（入力用!C3のみに文字列が存在することは禁止させる） 御教示よろしくお願い致します。

ExcelVBA初心者です。 Ａ表とＢ表があり、そこからＣ表を出力するプログラミングを作りたいのですが教えてください。 Ａ表（順不同） あ　100 い　1000 う　1500 え　1800 お　300 Ｂ表（順不同） a　う b　あ c　え d　お e　い Ｃ表（Ｂ表の記載順） a　1500 b　100 c　1800 d　300 e　1000 Ａ表とＢ表は与えられていて、Ａ表とＢ表の順番は入れ替わることがあるとする。Ｃ表はＢ表の記載順に整列する。 色々調べたのですがどのようなプログラミングを組んだらよいのかわからずこのサイトで質問に踏み切りました。 宜しくお願い致します。

Aのファイルに製品番号と製品名が書かれています。Bのファイルに製品番号とサイズが書かれています。 これを製品番号を元に製品名とサイズが書かれたひとつのファイルにまとめれる方法を捜しています。 Bのファイルは抜け番があり、列をくっつける訳には行かないので、AとBを比較して同じ製品番号に対して、 サイズを追加できるようなマクロはないでしょうか？　　ちなみに自分ではマクロを作れないので、 VECTOR等でダウンロードして使える物はないでしょうか？　 ファイルA 製品番号　　　　製品名 11111111　　　　ABCDE 11111112　　　　AABBCC 11111113　　　　AAABB 11111114　　　　AAAABB 11111115　　　　BBBBCCDD 11111116　　　　CCCCDDEE 11111117　　　　CCDDEE 11111118　　　　FFGG ファイルB 製品番号　　　　サイズ 11111111　　　　20×50 11111112　　　　10×40 11111115　　　　30×30 11111117　　　　40×20 11111118　　　　10×10 結合して、このようにしたいのです。 製品番号　　　　製品名　　 サイズ 11111111　　　　ABCDE　　　　　20×50 11111112　　　　AABBCC　 　　10×40 11111113　　　　AAABB 11111114　　　　AAAABB 11111115　　　　BBBBCCDD　　 30×30 11111116　　　　CCCCDDEE 11111117　　　　CCDDEE　　　　40×20 11111118　　　　FFGG　　　　　　10×10

Aのファイルに製品番号と製品名が書かれています。Bのファイルに製品番号とサイズが書かれています。 これを製品番号を元に製品名とサイズが書かれたひとつのファイルにまとめれる方法を捜しています。 Bのファイルは抜け番があり、列をくっつける訳には行かないので、AとBを比較して同じ製品番号に対して、 サイズを追加できるようなマクロはないでしょうか？　　ちなみに自分ではマクロを作れないので、 VECTOR等でダウンロードして使える物はないでしょうか？　 ファイルA 製品番号　　　　製品名 11111111　　　　ABCDE 11111112　　　　AABBCC 11111113　　　　AAABB 11111114　　　　AAAABB 11111115　　　　BBBBCCDD 11111116　　　　CCCCDDEE 11111117　　　　CCDDEE 11111118　　　　FFGG ファイルB 製品番号　　　　サイズ 11111111　　　　20×50 11111112　　　　10×40 11111115　　　　30×30 11111117　　　　40×20 11111118　　　　10×10 結合して、このようにしたいのです。 製品番号　　　　製品名　　 サイズ 11111111　　　　ABCDE　　　　　20×50 11111112　　　　AABBCC　 　　10×40 11111113　　　　AAABB 11111114　　　　AAAABB 11111115　　　　BBBBCCDD　　 30×30 11111116　　　　CCCCDDEE 11111117　　　　CCDDEE　　　　40×20 11111118　　　　FFGG　　　　　　10×10

こんにちは。 ＥＸＣＥＬでの一番簡単な日付の計算を教えてください。 知りたいのは例えば起算日から６ヵ月後の日付です。 例えば起算日が６月１日なら６ヶ月後が１２月１日となるように したいのですが・・・ 自分で作った式は Ｂ２に起算日、Ｂ３に６ヶ月後の日付を表示させるとして =YEAR(B2)&"/"&MONTH(B2)+6&"/"&DAY(B2) （2007/12/1）と表示 これよりもっと簡単な方法がありますか？ 教えてください。

現在sheet2に商品データが入っています。 商品コード　商品名　個数・・・・ A-1　　　　商品A　　23 A-2　　　　商品B　　45 A-3　　　　商品C　　90 A-2　　　　商品B　　16 これをsheet1に A-1　　　　商品A　　23 A-2　　　　商品B　　61 A-3　　　　商品C　　90 のように重複はまとめて作表するにはコードはどうすればよいのでしょうか？ そして最終行に合計の欄も設けたいのですが是非皆様のお力を貸してください。

お世話になっております。 セルＡの列2000行程度、順不同で1～6の数字が縦に並んでいます。 この場合、Ａ列に１、３、５の数字が並んでいる場合は、Ａ列のそれらのセルのすぐ隣（仮にＢ列）に”関東”と表示し、２、４、６の数字のすぐ隣のセルには”関西”と表示させるようにマクロで設定するには、どのような表記でしたら良いのでしょう？ 条件付書式の使用も考えたのですが、何しろファイル数が多いものですから、どうにかマクロで簡単に出来ないものかと模索中です。 恐れ入りますが、どなたかご教示願います。

先週質問したものから、さらに次の疑問です。 「シート1に任意のデータがあり、シート50からシート60までの10枚のシートのそれぞれ　W1からAW999までの間に、シート1のA1のデータがあれば、シート1のC1に「○」を打つ」という表を作っています。 　ここで、シート50からシート60までの２つ以上のシートが、シート１のデータを参照している場合、シート１のD１に「！」を打ちたいのですが、どうしたらいいでしょうか？ どなたかご回答をよろしくお願いいたします。

500のエクセルファイルがあり、それぞれのエクセルデータのＡ２からＦ２までのデータのをまとめた一覧表（１行目は、１枚目のエクセルファイルのＡ２－Ｆ２、２行目は２枚目のエクセルファイルの・・・、という感じでです）のを、新しいエクセルファイルもしくはテキストなどにでも手早く作れる方法をご存知の方、ご教授ください。コピペでやっていますが嫌になってしまいました。。マクロも触っては見たのですが、２枚目のエクセルファイルを２行目に、３枚目のエクセルファイルを３行目になどの方法の解決は思いつかず、挫折しました。よろしくお願いいたします

こんにちは。 マクロ初心者のものですが、 (1)シート１のＡ１からＡ５０までに、京都にある大学名のデータベース　を作る。 　シート２のＡ１に大学名の一部などのキーワードを入力すると、Ｂ１　に検索結果（大学名）が表示されるマクロをボタン１に登録。 (2)複数候補が出た場合に、次の候補をＡ２に表示してくれるマクロをボタン２に登録。 (3)シート２のＡ２にキーワードを入力すると、Ｂ２からＢ６までに５つの候補が表示されるマクロをボタン３に登録。 以上のことをfindメソッドを使ってやりたいのですが、自分でやってみると、どうしても(1)と(2)の作業が分割されません。 (1)では１度実行すると、もう一度ボタンを押しても実行されないようにしたいのですが、一度押して、検索結果が表示された後またもう一度押すと、次の候補を表示してしまいます。 次の候補の表示は(2)に移したいのですがどうしてもできません。 (3)もいろいろ試しているのですが、うまくいきません。 どんなことでも結構ですのでアドバイスお願いします。

「データベース控え」と「手番」という２つのシートがあります。 今、シート「データベース控え」を開いています。 VBAを使って「手番」シートにA3:S3をコピー＆ペーストする記述方法を教えて下さい。 マクロで表現すると以下の記述となります。 繰り返し処理をする実運用では画面が切り替わるなどスマートな方法ではないので困っています。 Range("A3:S3").Select Selection.Copy Sheets("手番").Select Range("A3").Select ActiveSheet.Paste Sheets("データベース控え").Select Range("A4").Select 実運用では数値の部分を変数に置き換えて繰り返し処理をしたいと思っています。よろしくお願いいたします。

エクセルのVBAでリストの検索をしたいと思います エクセルは２００２です 下記のリストで、例えばＡ２からＢ５のリストの中からE２に検索項目商品“A”と入力したら、G2に検索結果のすべての商品名と価格を貼り付けるようにするには、どうすれば良いか教えてください。 宜しくお願いします。 ｜―｜-Ａ-｜-Ｂ-｜-Ｃ―｜-Ｄ-｜-Ｅ-｜-Ｆ―｜-Ｇ-｜-Ｈ-｜ ｜１｜商品｜価格｜――｜――｜検索｜――｜商品｜価格｜ ｜２｜-Ａ-｜\300｜――｜――｜――｜――｜――｜――｜ ｜３｜-Ｂ-｜1000｜――｜――｜――｜――｜――｜――｜ ｜４｜-Ａ-｜\350｜――｜――｜――｜――｜――｜――｜ ｜５｜-Ｃ-｜1500｜――｜――｜――｜――｜――｜――｜　

たびたびお世話になります。 worksheet_changeを使うマクロを作成しています。 sheet１で入力されたデータがsheet2にあるデータベースの文字と一致した場合、sheet１の該当セル（入力した部分）の色を変えます。 もしそのセルの内容が変更、削除された場合は塗りつぶしなしに戻します。 Private Sub Worksheet_Change(ByVal Target As Range) Dim sTitle As String sTitle = Target.Value If sTitle = "aaa" Then Target.Interior.ColorIndex = 7 Else Target.Interior.ColorIndex = xlNone End If End Sub このコードで、「aaaという文字を入れたら色を変える／削除・変更されたらは塗りつぶしなし」という動作はできました。 しかしその後、aaaに当たる項目が増え、項目自体を変更する可能性も増えたので、上記のように別シートにデータベースを作ることにしたのです。 このコードを基にしてプログラムを組んだのですが、うまく参照が出来てないようでコンパイルエラーになってしまいます。 アイディアでも良いのでアドバイスをお願いします。

こんにちは。 Excelの数式で困っていますので、教えて下さい。 下のようなExcelの表で、 A2～D2、A3～D3、A4～D4の【数】にはゼロを含む何らかの数字が入ってて、 【空】は空欄です。 　　　A列　B列　C列　D列　E列 1　　　1　 　2　 　3　 　4 2　　　数 　数 　数 　数 3　　　空 　数 　数　 数 4　　　空 　空 　数　 数　 E2、E3、E4に数式を入れたいのですが、2～4行目の数字が入っているか 入っていないかを1行目の数字に対応させて、 A2、A3、A4に数字が入っていれば、A1の数字を計算に入れて、空欄であれば 計算にいれない。 E2には1＋2＋3＋4で【10】 E3には2＋3＋4で【9】 E4は3＋4で【7】 というふうに数字が入っている欄だけを1行目の数字を絶対参照して合計を求めたいのです。 SUMIFという関数を使って、E2にSUMIF(A2:D2,▲,$A$1:$D$4)という式を入れてみたのですが、▲には半角スペース・*（アスタリスク）・？（クエスチョンマーク）などを入れてみたのですが、エラーで計算が成り立ちません。 ▲のところに【空欄】という意味のものを入れたいのですが、それがあるのかないのかわかりません。 もしくは、この数式を使うのではなく、他の数式を利用するのでしょうか？ 説明が分かりにくいかもしれませんが、よろしくお願いします。

エクセルで請求書を作っています。 セルの書式設定で、日付を○/○と表示させるように設定しました。 でも、例えば「0108」と入力しても「4/17」と表示されます。 どうも1900年で表示されているようです。どこをどう設定すれば、打ち込んだ日付通りに変換されるでしょうか。 宜しくお願い致します。

初心者です。ご指導をお願いします。 ブックに20枚程度のグラフシートがあります。 これらの設定をまとめて行いたいのですが、全てに同じではなく、このうちの一部のグラフシートを選んで設定したく思います。 例えば、1枚だけなら、 With Chart(5) 各種設定 End With でいいかもしれませんが、決まった複数シートを、Withの後ろにどのように書くか分かりません。 無理だとは思いつつも以下のように書きましたが失敗です。 With Charts(5),Charts(9),Charts(12) とか With Union(Charts(5),Charts(9),Charts(12)) とか。 説明が下手ですみません。イメージとしては上記のようなことです。 【質問１】このように複数の特定グラフシートを選択する方法をご存知の方、教えていただけませんか。 なお、今回は仕方が無いので以下のように処理しました。 Dim k As Integer For k=1 to Charts.Count 　　　Select Case k 　　　　　　Case 5,9,12 　　　　　　　　　Charts(k).PlotArea.Interior.ColorIndex=5 　　　End Select Next k 【質問２】お詳しい方から見て、上記の処理方法は望ましいですか。一応意図したとおりに作動しました。 いろいろと調べてみましたが分かりませんでした。なにとぞご教示をお願いいたします。