- ベストアンサー
Excel VBAについて質問します
mt2008の回答
- mt2008
- ベストアンサー率52% (885/1701)
「+」以外の記号が在った場合は計算する？しない？ 何でも計算してしまって良いならこんな感じ。 Evaluateでとにかく計算してます。 Sub Sample() For i = 1 To ActiveSheet.Range("A1").End(xlDown).Row Range("A" & i).Value = Evaluate(Range("A" & i).Value) Next i End Sub
関連するQ&A
- Excel VBAについて
Excel VBAについて ExcelのセルA1に日付データ（yyyy/mm/dd hh:mm）が入っています。 このエクセルファイルを開いている間、セルA1の日付（時分）が更新されたらマクロを実行するようにしたいのですが、どのようにしたらよいのでしょうか。 セルA1の日付データが更新されるタイミングは決まっていません。 セルA1の日付データが更新されたらマクロ実行というのが難しいのであれば、 １０秒おきにマクロを実行というようなことができないでしょうか。 ご教授願います。
- ベストアンサー
- Visual Basic
- EXCEL VBAを用いての並び替えからの挿入表示
EXCEL VBAを用いての並び替えからの挿入表示についての質問です。 A列に文字と数字の組み合わせデータが入っています。 カテゴリーが４つ「AC○」「BC○」「CC○」「DC○」（○は数字です）があります。 A列は「AC○」「BC○」「CC○」「DC○」の順番で並んでいます。 （ただし3つのカテゴリしかないデータの場合もあり。） そこにC１セルにデータ「AC10」、E１セルにデータ「AC12」、G1セルにデータ「BC10」、I1セルにデータ「DC10」が入ってマクロ実行した場合、添付の『マクロ実行後』のように挿入させたいです。 つまり４つのカテゴリのいずれかを判断し、A列の各カテゴリの一番最後の行に挿入させたいです。 該当したカテゴリがなければ、「AC○」「BC○」「CC○」「DC○」のカテゴリの順で最初の部分に入れる。 このような処理をするにはＶＢＡ記述はどのようにすればよいでしょうか？ 私のVBAの知識レベルはマクロ記録をしてそれを元に少し修正や機能追加できたりするくらいの初心者です。 よろしくお願いいたします。
- 締切済み
- Excel（エクセル）
- 【Excel VBA】並べ替え
Excel2003を使用しています。 あるテキストファイルから必要なデータを抽出し、予めExcelで作成してある表に、抽出したデータをコピーするという作業をマクロで処理しています。 Excelの表は、A列→4桁の番号(数値)、C列→文字列、D列→数値で、A列の番号順(昇順)に表示されています。 抽出されたデータは、2行目以下に表示されるので、まず、A2セルに『0000』、C2セルとD2セルにそれぞれ該当のデータがコピーされ、以下、順番にコピーされます。このA2セル『0000』の行データをコピーされたデータの一番最後にもっていき、下記のように上方向へシフトさせたいのですが、このようなことはコードを追加することで可能でしょうか？ A列 C列 D列 2 0000 あ 100 3 1200 い 200 4 1500 う 300 ↓ 2 1200 い 200 3 1500 う 300 4 0000 あ 100 データ元のテキストファイルは、会社で使用しているシステムの機能を使って、テキストファイルにしたものです。このデータが昇順で表示されているので、こちらを並べ替えてマクロを実行すればいいかと思ったのですが、数値と文字列が混在しているので、Excelの表にコピーした後(数値と文字列の混在がなくなった後)に、上記のように並び替えることができればと思い、質問させていただきました。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルVBAでセル選択
エクセル2000でリストを作成し、ＶＢＡで編集しようとしています。 Ａ列に入力されているコードの先頭に「’」をつけて文字列とするための関数をＢ２のセルからＡ列のデータが入力されている最後のセルの隣までコピーしたいと思っています。 Ａ列の最終セルを取得するＶＢＡは分かったのですが、その値をＢ列の選択範囲として使用する方法がわかりません。 エクセルＶＢＡは全くの初心者です。 どなたか教えてください！
- ベストアンサー
- オフィス系ソフト
- 急!!Excel VBA 転記マクロを教えて下さい
Excel VBA超初心者です、 急ぎ作らなければならない資料があり、ご助力願います。 次の様な転記するアクションをコマンドボタンに設定したいです。 Sheet1の列A（先頭セルA2）に入力したデータを、 追加した（入力間違い等を除き、保存した）データ分だけ Sheet2の列B（先頭セルB3)の最終行から転記させていく。 列Ａに入力したデータは、並び替えをするので （この分は、今回のVBAに含みません。入力・転記後、Sheet１で普通に並び替えをします。） 列Ａと列Ｂのデータの順番が異なる。 以上です。 どうぞ宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- データベースの最下行に移動するＶＢＡがわからない
データベースの最下行にデータを入力すべく、マクロを実行すると データベースの先頭のセルが選択された状態で実行されますが 入力後にその入力を終えた最下行の先頭のセルが選択されるように マクロを実行したいのですがどうすればわかりません。 エクセル2010にてVBAで作成しています。 どのようなコードを入力すればできるでしょうか？
- 締切済み
- Windows 7
- エクセルのＶＢＡ 条件分岐について
エクセルのVBAで、条件分岐プログラムを考えております。 セルA1に入力された数値が、 2.0以下は"B1セルの値をC1セルへコピー 数値が 5.0以上の場合は"B2セルの値をC1セルへコピー それ以外の場合は”対象外”と表示させたいのですが ご教授お願いします。 又、条件分岐後の部分『C1セルへコピー』の部分を"マクロ１を実行" "マクロ２を実行"というように、変える様な事も出来ますでしょうか？ 以上よろしくお願いします。
- ベストアンサー
- 会計ソフト
- エクセル VBA
エクセルVBAで以下のようなデータがあります。 D列の文字列と右隣のE列の文字列の2つが入っているものをA列から探し、見つかったセルの上にセルを追加し、E列の右隣のF列に入っている文字列を代入したいです。 どのようなプログラムになりますか？
- 締切済み
- Visual Basic
- Excel VBA の質問です
Excel VBA でやりたいことがあるのですが、自分ではわからず困っています。。 データ例として、画像を添付しました。 実行前は、A列に名前、B列にそれぞれ選手の打点（ただし、最初の行は空白）というデータです。 これを実行後のように（A列、B列という場所は変わらずに）、それぞれの選手の打点平均を空白に算出するコードを教えてほしいです（ただし、各打点の入っていたデータはクリア）。 なお、画像例は「中田」までしか載せてませんが、その下にも続いていてデータ最後まで計算させるということをやりたいです。 ぜひ、ご教授願います。
- ベストアンサー
- Visual Basic
- エクセル2003のVBAを教えて
エクセル2003のVBAを教えてください。 次の対象データで、(1)(2)(3)の作業が出来るエクセルVBAを教えて下さい。 (1)(2)(3)個々のVBAでお願いします。 ●対象データ：種類(A列)、文字(B列)、 データの行数：不特定なので、データのある最終行までとします。 ●教えていただきたい項目 (1)：種類だけを(C列)に取り出す。 (2)：種類の先頭に空白の行を3行入れて、追加の２行目の種類(A列)に文字(B列)を入れる。 (3)：種類が5行以上あるときは、5行ごとに空白行を追加する。 ●対象データ 種類(A列) 文字(B列) AA あああ BB いいい BB いい BB いいい CC うう CC うう DD ええええ DD ええええ DD ええええ DD ええええ DD ええええ DD ええええ DD ええええ ●(1)のVBAの結果(このようになるVBAを教えてください。) (C列) AA BB CC DD ●(2)、(3)のVBAの結果(このようになるVBAを教えてください。) 種類(A列) 文字(B列) あああ AA あああ いいい BB いいい BB いいい BB いいい うう CC うう CC うう ええええ DD ええええ DD ええええ DD ええええ DD ええええ DD ええええ DD ええええ DD ええええ
- ベストアンサー
- Visual Basic
お礼
回答ありがとうございます！ 『＋』以外の記号は計算しなくて大丈夫だと思います… わざわざありがとうございます。