- ベストアンサー
エクセルのＶＢＡで、開いているブックのシート数を知りたいのですが。
lucilisの回答
９７持ってないんで９５でやってみましたがブック全体のワークシート数なら ActiveWorkbook.Worksheets.Count で解ります。
関連するQ&A
- Excel VBAで教えてください。
Excel VBAで教えてください。 テキストデータをExcelで読み込んだ後、Sheet1に以下のデータが入っており、 A列 B列 C列 氏名 開始日(yyyy/mm/dd) 終了(yyyy/mm/dd) テキストボックスに開始日(yyyy/mm/dd)、終了日(yyyy/mm/dd)、を入力し、入力した開始日から終了日のデータ検索し、A列からのデータをコピーし、Sheet2に貼り付けしたい。 テキストデータをExcelで読み込むコードはできたのですが、その後の処理ができずに困っています。 ユーザーフォームに入力するコードも教えてください。
- ベストアンサー
- SE・インフラ・Webエンジニア
- Excel2007でBOOK間のシート移動をVBAで行うとエラーになる
Excel VBAで開発されたソフトの改造を行ってますが、Excel2007で動作しないマクロがあり困ってます。 <開発環境> ・WindowsXP Pro SP3 ・Celeron 540(1.8GHz) ・メモリ1GB ・Excel2007 SP1 (Microsoft Office2007) 改造元ソフトはOffice2000で開発されており、Excel2007で動作するとマクロエラーが発生する処理があります。 因みにまだソフト改造はしてなく、そのままExcel2007で動作させるだけでマクロエラーが発生します。 発生する箇所はVBAで開発されており、下記のコマンドです。 Sheets(移動元シート名).Move Before:=Application.Workbooks(移動先ブック名).Sheets(1) 異常の内容は下記になります。 ------------------------------- ?err.Description 移動先またはコピー先のブックの行列数が元のブックの行列数よりも少ないため、シートを移動先またはコピー先のブックに挿入できません。データを別のブックに移動またはコピーするには、データを選択して、[コピー] コマンドと [貼り付け] コマンドを使用して移動先またはコピー先のブックのシートに挿入してください。 ?err.Number 1004 ------------------------------- 移動元BOOKは１シート、移動先BOOKは１シートあります。 これをExcel2000で実行すると正常にシートが移動できます。 （移動元BOOKのシートがなくなりBOOKが終了して、移動先BOOKは２シートになります） Excel画面の移動元シートを選択して、右クリックメニューの「移動またはコピー」で移動先ブックを指定して移動すると 「移動先またはコピー先のブックの行列数が元のブックの行列数よりも少ないため、シートを移動先またはコピー先のブックに挿入できません。データを別のブックに移動またはコピーするには、データを選択して、[コピー] コマンドと [貼り付け] コマンドを使用して移動先またはコピー先のブックのシートに挿入してください。」 とVBAから実行した時と同じ内容のエラーダイアログが表示されました。 （Excel2000では手動でも移動できました） Excel2007では１シートで構成されたBOOK間の移動はできないのでしょうか？ また、これをVBAで対策しようとした場合にどうしたら良いのでしょうか？ ネットで調べましたが判らず、ここで質問させて頂きました。 判りにくい説明で申し訳ありませんが、よろしくお願いします。
- ベストアンサー
- Visual Basic
- EXCEL VBA シートの名前を指定してコピー
EXCEL VBA 初心者です。 とても困っています。 助けてください。 excel2010を使っています。 今，「原本」というシートがあり，それをマクロを使って同じブック内にコピーしたいと思っています。 コピーして新しく作られたシートの名前は「A1」のセルに入力されている値にしたいです。 コピーされた後のシートにはマクロボタンは削除したいと考えています。 また，コピーした後のアクティブシートは「原本」のシートにしたいのですが これを全部いれたコマンドはどのようになるのでしょうか。 似たような質問だったり，回答があるのですが， どのように組み合わせたらいいのかよく分かりません。 どなたかお助けいただけないでしょうか。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- EXCEL VBA ワークシート貼り付け
ＥＸＣＥＬ２０００のＶＢＡを使用して 元データーの左から５番目のワークシートをコピーして 同じフォルダー内にあるエクセルデーター（１０個）の 一番左に貼り付けたいのですがＶＢＡの処理で出来ますでしょうか？ 実施する処理は元データーの左から５番目のワークシートを コピーして貼り付けたいデーターを開いて 開いたデーターを移動先ブック名に指定して一番左に元データーの 左から５番目のデーターを貼り付けて 処理が終了したら移動先ブックを閉じて次のデーターも 同じことを行いフォルダー内のデーター全てに同じ処理を 行ったら終了する？ 文面だけの説明で大変申し訳ないのですがご教授していただけないでしょうか？
- ベストアンサー
- オフィス系ソフト
- (VBAにて)シート間のコピーの文字数限界ついて
質問が抽象的ですみませんが、質問させて頂きますので 宜しくお願いします。 (まだVBAの日が浅い者です。) ・Excelにて障害管理表というものを作成しています。(sheet1に) ・発生日時や障害内容などが列ごとに管理されている表です。 ・各項目名がA3～Y3で各データがA4～Y60まで入力されています。) ・今後も障害が発生することにより、行数が増えていきます。 ・sheet2について ・マクロ用の専用シートにしています。 ・コマンドボタンを作成し、そこにマクロ文を挿入しています。 ・マクロ文の内容は、sheet1の[F列:発生日時]をキーにして、 sheet2の「セルA1→開始年月]「セルB2→終了年月]を入力して コマンドボタンを押す ・sheet1よりsheet3に指定した期間内のみデータを表示させる。 というのが大筋の内容です。 大体うまく行きましたが、1つだけ問題点が出ました。 ・[sheet1のP列]には対応内容のデータが入力されています。 ・sheet3のP列にほぼコピーは出来たのですが、2件ほどが sheet3のP列に反映されず、空白のままとなってしまいます。 ・調べてみると、2件ともかなりの文字数がsheet1のP列に入力されていました。 (実際は) マクロ文を実行すると、下記のエラーが出て処理がSTOPしてしまいます。 「実行時エラー'1004': アプリケーション定義またはオブジェクト定義のエラーです。」 ↓ (P列の長い文字数をsheet1～sheet3へコピーする所です。 ですので、「On Error GoTo 0～On Error Resume Next」コマンドを使用してエラーを吹っ飛ばして処理を続行しています。(2件は反映されませんが。) ・シート間でセル内容をコピーする時の文字数の限界ってあるのでしょうか？ ・また、どのようにすれば解消されるでしょうか？ ・因みに、sheet1の例の2件の文字数をかなり削除したらうまく行きました。) ・sheet1の例の2件の文字数を削らず、sheet3のP列の文字を小さく設定してもセルを最大に広げてもダメでした。) 長くなって申し訳ありませんが宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- vba ブック間でシート名のコピーをするには
始めまして、よろしくお願いします。 excel vba 初心者のものです。 2つのブックがあり同時に開いている状態です。1つのブックはデータがあります。 もう1つは空のブックです。 データのあるブックのシートには、 シート1のシート名は「8月1日」 シート2のシート名は「8月2日」 シート3のシート名は「8月4日」 シート4のシート名は「8月5日」 シート5のシート名は「Sheet1」 やりたいこと データ、シート名があるブックから、 空ブックのシートにシート名をコピーしてきてセルに貼り付けたいです。 シートに名前を付けてるシート数は不規則なので「Sheet1」まで来たら終了したいです。 どうぞご教授の程よろしくお願い申し上げます。
- ベストアンサー
- Excel（エクセル）
- エクセルVBAでロックをかけたい
エクセルVBAでコマンドボタンを押して、計算処理をさせているのですが、 計算処理中はシートへの入力等の操作をロックしたいのですが、 出来ますか? 計算処理が終わったら、元に戻したいと思っています。
- ベストアンサー
- Excel（エクセル）
- EXCEL VBA シート内の特定のセルに値が入…
EXCEL VBA シート内の特定のセルに値が入力された際に処理を実行するプログラム EXCELシート内の特定のセルに値が入力された際に処理を実行するプログラムをEXCEL VBAで作成したいと考えています。 EXCELに計測データを取込み、このデータが設定値以外の場合のみ、トリガーを出す様なイメージで使いたいと思います。 どの様に考えれば良いでしょうか？サンプル等ありましたら紹介ください。 上記質問の”トリガー”について補足します。 あるセルに値が入力されたら、マクロを実行するという風にしたいという意味です。 単純にマクロ実行を手動で行うのでは無く、ある値が判定値以外の場合に他アプリケーションを操作したいという意味です。。
- ベストアンサー
- 開発
- ＶＢＡ？Ｃ？なにを使えばよいでしょうか
あるアプリケーションにデータ登録をするときに、現在はコマンドプロントから コマンド(c:\>xxxxx -***** "name" "age" ・・・・)を打って登録しています。 最近急に、データ量が増えて手動で登録するのが困難になってきました。 現在このデータはエクセルで保存してあります。これからも、エクセルで 管理していく予定です。 そこで、エクセルに入力したものをエクセルＶＢＡを使ってセルからデータを 取り出して、1件づつ自動でアプリケーションに登録するコマンドを発行したい と考えています。 それか、エクセルのデータをＣＳＶ形式にしてＣ言語で作ろうかとも思っています。 実現したいことは ・データはエクセルで管理している。 ・毎回手動でコマンドをたたいていたのを、プログラムで実現させたい。 （ＤＯＳにコマンドを発行する） ・データの入力はＣＳＶを読むか、エクセルシート上でセルからひっぱって くるか。 ＶＢＡ、Ｃともに初心者です。どの言語でどういう風な形で プログラムを作ればよいかわからず困っています。 実現するよい方法をおしえてください。よろしくおねがいします。
- ベストアンサー
- その他（プログラミング・開発）
- （エクセル）別のブックにシートをコピーすると
初めて質問します。 EXCEL2000で、VBAとテンプレートが同じブックに保管されています。(test1.xls) test1.xlsのユーザーフォームでデータを入力して、コマンドボタンを押すと、テンプレートが別ブックにコピーされ、セルが埋められるようにしたいのですが、テンプレートにシート間参照(temp!A1)を使っているので、コピー元のブックを参照するように書き換えられてしまいます。([test1.xls]temp!A1) がんばって検索したのですが、回避策を見つけることができませんでした。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
お礼
ありがとうございました。 カウントできました。 お陰様で、これで、今作っているプログラムが完成します。