Excel VBA質問スレ Part6

1 名前：デフォルトの名無しさん mailto:sage [2008/03/11(火) 19:31:39 ] ExcelのVBAに関する質問スレです 質問前に　【 >>2-3 】　あたりを良く読むこと 前スレ pc11.2ch.net/test/read.cgi/tech/1197448064/ ★1 質問テンプレ(雛形)は用意しませんが､OSとExcelのバージョンは必ず書きましょう。 ★2 ExcelのVBA以外の部分に関する質問はNGです。 　　　但し､VBA無しでも出来ることだが､あえてVBAでやりたいって物に関してはOK。 ★3 ExcelのVBE(Visual Basic Editor)を使うとしても､VBAの分野以外に関してはスレ違いです。 　　　 　VBAとは､『Visual Basic for Application』の略で 　　Application 　　├Workbooks 　　｜└Workbook 　　｜　 ├Worksheets 　　｜　 ｜└Worksheet 　というApplication以下のオブジェクトを､VB言語で操作するものを指します。　 　例えExcel付属のVBE(Visual Basic Editor)を利用しようとも､このApplication以下のブックやシート､ 　セルやオブジェクト等を操作するもの以外はVBA分野の話ではないので､ここでは聞かないでください。 ★4 とりあえず､Excelのインスタンスを作らずにVB6で出来ることは全てスレ違いだと思ってください。 ★5 レベルはどうあれ､ここはプログラマ用の板スレです。プログラマとは､自分でプログラムを組み 　　　コードを書く人の事なので､自分でやるきは全く無く､丸投げしようって人はお断りです。 　　　ヒントを貰えばあとは自力でなんとかしますって人のみどうぞ。 992 名前：デフォルトの名無しさん mailto:sage [2008/06/03(火) 15:38:51 ] 質問したいけど構文ここに書くの面どくせえ 993 名前：デフォルトの名無しさん mailto:sage [2008/06/03(火) 18:52:12 ] ・・・ If ActiveCell.Column = 6 Then Range("A1:A10").Copy ActiveCell Else MsgBox "ここは駄目" End If ・・・ これだと6列目を先頭としてA1〜A10のセルをコピーでき、 6列目以外は入力不可でmsgboxが出るのですが、 例えば6列目〜10列目を入力可能にするにはどうしたら良いでしょうか？ 994 名前：デフォルトの名無しさん [2008/06/03(火) 22:18:12 ] オートシェイプの始点やら終点ってどういう単位？ Sheets(2).Shapes.AddLine(Xs, Ys, Xe, Ye).Select たとえば、こうやって変数で当てて500から520までかけ。次に520から540までかけ ってやっても線がつながらんのだが。 995 名前：デフォルトの名無しさん mailto:sage [2008/06/04(水) 01:32:55 ] >>994 ちゃんとつながるぞ。単位はポイント Sheets(1).Shapes.AddLine(50, 100, 100, 50).Select Sheets(1).Shapes.AddLine(100, 50, 150, 100).Select Sheets(1).Shapes.AddLine(150, 100, 100, 150).Select Sheets(1).Shapes.AddLine(100, 150, 50, 100).Select 996 名前：デフォルトの名無しさん mailto:sage [2008/06/04(水) 10:34:25 ] VBAを使用して作成したExcelファイルを立ち上げようとすると、 「問題が発生したため、Microsoft Excel for Windows を終了します。 ご不便をおかけして申し訳ありません。」 というMicrosoftのエラーになり、Excelが開かなくなってしまいました。 中のモジュールを何とか見る方法はないでしょうか？ 997 名前：デフォルトの名無しさん [2008/06/04(水) 20:06:50 ] あるセルにある文字列が入っています。特定の文字列では無いのですが、 この文字列から、条件を満たす物を抽出したく考えております。 具体的には、「*」　で囲まれた文字列を抜き出したく考えております。 （「」で囲まれた物以外を削除） 調べてみたのですが、このような処理は可能でしょうか。 可能でありましたらば、教えてくださいませ。よろしくお願いします。　 998 名前：デフォルトの名無しさん mailto:sage [2008/06/04(水) 21:23:50 ] regexp 999 名前：デフォルトの名無しさん [2008/06/04(水) 22:58:25 ] 次 pc11.2ch.net/test/read.cgi/tech/1212587819/l50 1000 名前：デフォルトの名無しさん [2008/06/04(水) 23:08:39 ] 10000ならオマエラの人生幸せ それ以外なら一生不幸 1001 名前：１００１ [Over 1000 Thread] このスレッドは１０００を超えました。 もう書けないので、新しいスレッドを立ててくださいです。。。

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef