keirika の回答履歴
- Excelで同一セル内に入力されているデータを他のセルに分割したい
こんにちは。 宜しくお願い致します。 エクセルで同一セル内に、セル内改行で1~6列ほどのデータが入力されています。 A1セル~A100セル…という風に、縦にデータが入力されていて、それぞれのセルにセル内改行を含み、データが入力されているイメージです。 それぞれのセル内のデータを… 例えば、A1セル内に5行入力されていたら、A2セルから入力されている行数分(ここでいうと5行)挿入し、それぞれにデータを分割して入力させたいと思っています。 以下のセルも同様に、挿入→分割といった感じで全データを分割させたいのです。 OKWave内でもチェックして、 http://okwave.jp/qa1927817.html?ans_count_asc=2 や http://okwave.jp/qa4216384.html など、近いものはいくつか見つけたのですが、ピッタリのものが見つからず、マクロの編集もよくわからなかったのでこちらで質問させてもらいました。 どなたか申し訳ありませんが、教えていただけますか? 宜しくお願い致します。
- Excelで、数字をhh:mmの形式へ変換
よろしくお願いします。 Windows XP Pro SP2 Excel 2007 例えば、「93」という数字がセルにあるとしたら、 これをhh:mmの形式に変換して「1:33」となるようにしたい のですが可能でしょうか。 可能でしたら、その方法を教えてください。 どうぞよろしくお願いします。
- 関数 2列から2つの条件をの個数をカウントするには?
検索範囲がA列・B列の2列から2つの条件を満たす個数をカウントしたい場合 検索条件は赤,青,黄のそれぞれの1ヶ月の個数です B列には日付が1/1~1/31まであります この説明で理解できますでしょうか? ご回答お待ちしております。 A列 B列 赤 2008/1/1 青 2008/2/1 黄 2008/3/1
- 締切済み
- その他(ビジネス・キャリア)
- J0523
- 回答数2
- ←キーを押し続けても連続して移動しない
友人のパソコンですが、質問です。エクセル起動時です(2003)(XP) 1 ←キーで上,下、左、右に移動しようとする時セル1コマを移動し、続けて移動しようとキーを押し続けていても出来ない。1秒程度間を置き移動しようとすると出来ます。 エンターキでも同様。続けてキーを押しても反応せず、間隔を置いて押すと、移動する。 2 セルに数字を入れる時も同様、同じ数字を続けて入力しようとすると出きず、少し間を置かなければならない。 友人曰く、ある設定をしてからそうなった、とのことですが、それが、どこをどう設定したのか、思い出せない。(多分言語バーではなかったか、と言っているのですが) 私もいろいろ設定を変更してみたが解決できず。 お教え下さい。
- エクセルVBAで複数の条件を満たす検索方法
エクセルのVBAを使ってデータ検索を行うプログラムを作っています "Sheet2"は下記のように、A列に生年月日、B列に住所、C列に電話番号、D列にメールアドレスが入力されています 【Sheet2】 生年月日 住所 電話番号 メールアドレス A B C D 1 1999/9/10 東京都○○ 11-111-1111 aa@goo.co.jp 2 2003/2/26 大阪府○○ 22-222-2222 bb@goo.co.jp 3 1985/6/22 福岡県○○ 33-333-3333 cc@goo.co.jp 4 1995/4/11 愛知県○○ 44-444-4444 dd@goo.co.jp "Sheet1"のA1に生年月日、A2に住所、A3に電話番号を入力し、"Sheet2"のデータと照合して、3つの値が合致した行のD列のメールアドレスを"Sheet1"のB1に返したいと思います 上記の表だと、"Sheet1"のA1に1985/6/22、A2に福岡県○○、A3に33-333-3333と入力されている場合、B1にcc@goo.co.jpの値を返すようにしたいのです。 findを使って生年月日、住所、電話番号を検索し、行番号を取得して、3つの行番号が同じならその行番号のD列の値を返すというような方法で考えていたのですが、エラーが回避できずに困っています。 生年月日が同じ人がいたり、夫婦や親子などは住所と電話番号が同じといった場合があり、上手く検索できません。 エラー回避の方法、もしくは他のやり方でも構いませんので どなたかご教授願えないでしょうか? よろしくお願いします。
- ベストアンサー
- Visual Basic
- pattern706
- 回答数6
- エクセルの入力データーを別のシートの日付と氏名の交差点に記録していくマクロ
エクセルのセルに入力したデーターを別のシートの名簿一覧に記録していくにはどのようなマクロを組めばよいでしょうか? 入力イメージとして、「田中 90 良」この項目は手動で入力するとします。 Sheet1 A B C D E F G 1 日付 氏名 成績 区分 2 9/19 田中 90 優 ここでマクロを実行すると別のシートに Sheet2 A B C D E F G 1 1組 2組 2 田中 佐藤 小林 近藤 三浦 遠藤 3 9/19 90 と記録され、次に入力し、 Sheet1 A B C D E F G 1 日付 氏名 成績 区分 2 9/21 小林 80 良 さらにマクロを実行すると Sheet2 A B C D E F G 1 1組 2組 2 田中 佐藤 小林 近藤 三浦 遠藤 3 9/19 90 4 9/21 80 このように記録され、さらに Sheet1 A B C D E F G 1 日付 氏名 成績 区分 2 9/23 佐藤 95 優 と入力して、さらにマクロを実行すると Sheet2 A B C D E F G 1 1組 2組 2 田中 佐藤 小林 近藤 三浦 遠藤 3 9/19 90 4 9/21 80 5 9/23 95 という具合に、氏名と日付が交差するセルにデーターを記録していきたいのですが、 可能でしょうか? どうかお返事よろしくお願いいたします。
- ベストアンサー
- その他(プログラミング・開発)
- shosin999
- 回答数3
- エクセルの入力データーを別のシートの日付と氏名の交差点に記録していくマクロ
エクセルのセルに入力したデーターを別のシートの名簿一覧に記録していくにはどのようなマクロを組めばよいでしょうか? 入力イメージとして、「田中 90 良」この項目は手動で入力するとします。 Sheet1 A B C D E F G 1 日付 氏名 成績 区分 2 9/19 田中 90 優 ここでマクロを実行すると別のシートに Sheet2 A B C D E F G 1 1組 2組 2 田中 佐藤 小林 近藤 三浦 遠藤 3 9/19 90 と記録され、次に入力し、 Sheet1 A B C D E F G 1 日付 氏名 成績 区分 2 9/21 小林 80 良 さらにマクロを実行すると Sheet2 A B C D E F G 1 1組 2組 2 田中 佐藤 小林 近藤 三浦 遠藤 3 9/19 90 4 9/21 80 このように記録され、さらに Sheet1 A B C D E F G 1 日付 氏名 成績 区分 2 9/23 佐藤 95 優 と入力して、さらにマクロを実行すると Sheet2 A B C D E F G 1 1組 2組 2 田中 佐藤 小林 近藤 三浦 遠藤 3 9/19 90 4 9/21 80 5 9/23 95 という具合に、氏名と日付が交差するセルにデーターを記録していきたいのですが、 可能でしょうか? どうかお返事よろしくお願いいたします。
- ベストアンサー
- その他(プログラミング・開発)
- shosin999
- 回答数3
- EXCELでこのようなマクロを作りたいです
EXCELでこのようなマクロを作りたいのですが、 是非作成方法をお教えいただきたく思います。 1.B列を、B1から一番下まで検索 2.ある文字列(完全一致)を発見したとき、そのひとつ上のセル (B25で発見したら、B24)と同じ内容に置き換える。 3.一番下まで繰り返す。終了条件は、 ・一番下まで行って、検索する値が無くなった時 ・「ある文字列」を発見したとき 以上です。 よろしくお願いいたします。
- 締切済み
- オフィス系ソフト
- areddin711
- 回答数5
- VLOOUPの使い方
VLOOKUP関数で、検索の型を TRUEに設定し 検索値に 完全に一致しない値を 入力した場合に 近似値の内で、最小の値を選択しますが これを逆に最大の値を選択するようにするには どうしたらよいのでしょうか 組み合わせで できるのでしょぅか ご指導お願いします。
- 【VBA】該当する文字列がある列を削除したい。
指定した文字列を検索して、そのセルのある列削除したいです。 例えば2行目に、表の項目として「社名、フリガナ、住所、電話番号、備考、・・・」 と、あるときに、フリガナと電話番号の列を削除させたいのです。 シートによって項目の位置が若干変わる為、列番号を指定して削除するようなことは出来ません。 項目の名前が変わることはありません。 vbaでどのようにすればよいのでしょうか。 また、2行目の範囲で文字列を検索して、該当する文字列があるセルの位置情報を 取得したい場合はどうすれば良いでしょうか? 宜しくお願いします。
- IF関数の空白セルの扱いについて
関数にあまり詳しくないので、教えてください。 セルA1からH1に入力された数値の「最大値が8以上」または 「最小値が3以下」の場合は○、それ以外は空白としたいのですが、 「=IF(OR(7<MAX(A1:H1),4>MIN(A1:H1)),"○","")」だと、 範囲内のすべてのセルが空白の場合は最小値を0とみているのか「○」となってしまいます。 空白セル=0としないようにするには、どうしたらよいでしょうか?
- EXCELで、2つのキーを使用して検索
EXCELで以下のようなことをやりたいのですが、上手い方法が思いつきません。 ◆やりたいこと◆ A1からF6までの範囲の中から、ある1つのセルの値を取り出す。 ◆条件◆ 1.A1からA6のいずれかが、1つ目のキーとなる。 2.C1からC6のいずれかが、2つ目のキーとなる。(キーは2つセットであれば重複しません) 3.それぞれのキーに合致した行の、E列の値を取り出す。 VLOOKUPを使えば良いのかとも思ったのですが、これはキーが1つだけのようで、 難航しております。是非ご教示お願いいたします。
- ベストアンサー
- オフィス系ソフト
- areddin711
- 回答数1
- Excel2003でテキストのデータをセルに代入
初めまして。 私はWindowsXPのExcel2003のVBAでテキストファイル のデータ(カンマ区切り)を指定したセル行に代入 したいと思っているのですが上手くいきません。 下記のコードを実行したところ、 Dim n As Long, buf As Variant, tmp As String Dim lrow As Long lrow = 14 n = FreeFile Open "C:\TEKISEI.txt" For Input As #n fname = "C:\TEKISEI.txt" Do Until EOF(n) Input #n, tmp lrow = lrow + 1 buf = Split(tmp, ",") Worksheets("Sheet1").Range("B14:B30") = buf Loop Close #n 指定したセル行(B14:B30)にテキストファイル (中身はカンマ区切りの数字の羅列)のデータの 最後の数字がセル行に入ってしまいます。 このコードでセル列(B14:P14)ならセルごとに 順に数字が代入されましたが、これをセル行に代入 したいと思っています。 どこが悪いのか皆様にご教授願います。
- 締切済み
- Visual Basic
- tierra31
- 回答数1
- Excelのシートに隠し文字列を持たせたい
Excel2007を使用しています。 マクロを使用して、特定のシートだけ、 特定の処理を行わせたいと思っています。 そのときに、隠し情報を持たせたシートだけを対象にしたいのですが、 どのようにしたら良いかが、分かりません。 ※タイトルにある「隠し文字列」を持たせる方法でなくても構いません。 どのように実現させたら良いのでしょうか? アドバイス頂けませんか? よろしくお願いいたします。
- テキストボックスの書式について(Access)
Access2003の帳票フォーム上にあるテキストボックスで単価を表示させているのですが、単価が小数点1位まであるものと整数のみのものがあります。これを次のように単価のテキストボックスに表示させたいのですが 例1)単価:100→\100 (\100.0では無い) 例2)単価:99.4→\99.4 <説明> データが整数の場合は整数表示で先頭に¥マークを、データが小数を含む場合は小数を含めた表示で先頭に¥マークを付ける。 どの様な方法があるでしょうか。条件付き書式などが該当するように思えますが、インターネットで調べてもよく分かりませんでした。 VBAのサンプルコードなどご呈示いただければ幸いです。
- エクセル VBA コンボボックスの計算
UserForm1上に コンボボックスには数字がリストされます! ComboBox1、ComboBox2、ComboBox3 3つ作成して 例えば ComboBox1=1 ComboBox2=0 ComboBox3=5 と表示された時 CommandButton1をクリックしたら UserForm2の TextBox1に”6”と足し算 された数字を表示したいのですが 普通のセルなら 出来るのですが・・ ComboBoxでするなら どのような記述に なるのでしょうか? すいません、教えて下さい!
- VBAでの質問
お世話になります。 下記の記述で、「←」の矢印の記述で、 Cells.(5,2)がブランクでなければ、 「→」から進めたいのですが、 どの様に記述すれば宜しいでしょうか ご教示お願いします。 Sub 表記入() Dim Data As Range Dim i As Integer Dim j As Integer Dim k As Integer Set Data = Sheets("集計").Range("A2").CurrentRegion j = 16 k = 0 With Sheets("表") For i = 3 To Data.Rows.Count If Data.Cells(i, 51) <> "" Then .Cells(5, 2) = Data.Cells(i, 3) ← .Cells(5, 7) = Data.Cells(i, 4) → .Cells(j, 2) = Data.Cells(i, 10) .Cells(j, 6) = Data.Cells(i, 11) & Data.Cells(i, 12) .Cells(j, 14) = Data.Cells(i, 51) Else End If k = k + 1 If k = 10 Then j = j + 18 k = 0 Else j = j + 1 End If End If Next i End With End Sub
- ベストアンサー
- Visual Basic
- miruchoko
- 回答数1
- エクセルの数値欄の桁区切りを4桁にする方法
日本の数値の読み方は、一十百千、一万十万百万千万、一億十億百億千億、一兆・・・のように4桁ごとに変わっていくのに、エクセルの数値の区切りは、3桁(123,456,789)しかなくて不自然で読みにくいです。 これを(1234,5678)のように4桁区切りに(自動的に)したいのですが、手順がわかりません。 初歩的な質問ですみませんが、どなたかご存じでしたら、教えて下さい。
- エクセル VBA 複数シート検索
超初心者です。 エクセルは2000を使用しております。 VBAを使って、複数シート(各フロア)にある座席表から、複数の人名(重複なし)を検索後、該当セルの背景に色を塗って印刷したいのですが、WEBで検索しても思うようにマクロを組めません。お助け願います。 質問が上手く出来ていないかもしれませんが、流れとしては 下記の感じです。 1.あらかじめ決められたシートに検索する人名のリストが存在 2.決められた複数のシートから検索 3.リストを上から順に人名がなくなるまで検索をループ 3.該当のセルの背景を塗りつぶす 4.印刷 簡単に言えば、誰がどのフロアのどこにいるかすばやく検索したいです。 っという感じでしょうか。