Excel VBA質問スレ Part6

>>951
それって、100％ExcelVBAのような気がするけど・・・

共有されていないブックを、"読み取り専用"で開いているメンバーを
VBAで調べるのは不可能ですか。

VBAにCで言うDefineのようなものはないのでしょうか。
StaticステートメントをDefineのように使うのはおかしくないですか？

自分の家でつくったユーザーフォームが友達のＰＣで開いたら
背景色が変わってたんだけどなんで？

俺excel2000
友excel2002

ユーザーフォームの色は、絶対指定と、OSの設定にあわせる方法と
二種類あって、おそらく後者を適用しているのでしょう。

VBAに日本語化パッチを当てるにはどうすればいいのでしょうか

いろいろと検索してもわからなかったので質問させていただきます。
CSVファイルをエクセルファイルに変換したいのですが、特定の列だけを
文字列として処理を行いたいのです。
また、変換元のCSVファイルの指定をBATファイルを利用したいのですが、
よい手段がわかりませんでした。
なにかいい方法はありませんか？？

Excel総合相談所 69
http://pc11.2ch.net/test/read.cgi/bsoft/1211605143/

VB Editor じゃなくて、自分の好きなエディタでマクロを書きたいのんですが、
何かいい方法ありますか？
今はエディタから全コピーしてVBA側に全ペーストしてます；；

俺は秀丸派でCもJAVAも書いてたんだけど
VBA使ってみてビビった。あれはVBAが
元始にして究極のエディタだと思うんだが。
関数の保管とかしてくれるしもう最高。

×保管
○補完

UserFormで変数を持つにはどうすれば良いですか？
UserFormにTextBoxを貼り付けてTextBox1を変数として使うのもよいのですが
内部で使う変数なので表示はしたくないです。

何をやりたいかというと、このUserFormでOKボタンを押されたことをBOOL変数に記録し、
そして呼び出し元で、OKが押されたかどうか判断したいです。
つまりMFCで言えば
CDialog dlg;
if(dlg.DoModal() == IDOK)
{
UserFormObj.Show
IF UserFormObj.bOk = TRUE THEN
　処理
END IF

見たいな事をしたいです。

UserFormで変数を持つにはどうすれば良いですか？
UserFormにTextBoxを貼り付けてTextBox1を変数として使うのもよいのですが
内部で使う変数なので表示はしたくないです。

何をやりたいかというと、このUserFormでOKボタンを押されたことをBOOL変数に記録し、
そして呼び出し元で、OKが押されたかどうか判断したいです。
つまりMFCで言えば
CDialog dlg;
if(dlg.DoModal() == IDOK) 処理
みたいな。

VBAだと
UserFormObj.Show
IF UserFormObj.bOk = TRUE THEN
　処理
END IF

って感じだと思ってます。

すみません。2重カキ子しちゃいました。。>>963は無視してね

すみません。2重カキ子しちゃいました。。>>963は無視してね

>>964
UserFormにOKプロパティを作る
又は、手軽に標準モジュールにPublic変数を宣言する

すみません。2重カキ子しちゃいました。。>>964は無視してね

>>967
ありがとうございます。

OKプロパティーというのがあるのですね。勉強になります。


＃今日は書き込みがやたらエラーになる(:_:)。スレ汚しすみません。

>>969
ごめん、UserFormにOKプロパティ作っても、UserFormが閉じたら変数破棄されるからダメだね
Public変数でどうぞ

VCで作成したDLLを使用してVBAでプログラマしてます。

Private Declare Function DataRead Lib "ExcelVBA.dll" Alias "_CareerDataRead@4" (strFileName As String) As String・・・�@

だと「DLLが見つかりません」と出てきます。そんで、Dllのパスをフルパスにしてやると動作するんですが、そすると他のPCで
パスがないので「Dllが見つかりません。」と出てきちゃいます。

できれば、ブックのあるフォルダにDLLをおいて�@のように呼び出したいのですが、無理なのでしょうか？

>>971
つ環境変数

セルに挿入されているハイパーリンクを普通にクリックして、ページ先に飛ぶようなことを
VBAから実行することは可能でしょうか。

あと、ユーザーフォームにハイパーリンクを張ることは可能ですか？

例えば、PC起動時にあるソフトをアップデートしたいとき、VBAできたりするんですか？

そんなもんメールで告知しろ。

内部的なソフトで、アップデート（上書き）したいだけなら
バッチファイルとスタートアップのショートカットを駆使すりゃいいやん

VBAからSystem.Text.StringBuilderを使うとき、
オーバロードがどのAppend_数字に対応しているか調べるには
どうすればよい？

エクセル2000で

指定した名前で
ＣＳＶファイルで保存する方法ってわかりますか？

>>977
マクロの記録で出てこないか？

>>977
使ったことないけど、getsaveasfilename でいいんじゃない？

>>977
(っ´▽｀)っ
Excel2000のVBAでCSV保存すると、
日付型はことごとく文字化けするけどなー☆

>>978
>>977
サンクス

ビジュアル　ベーシック　フォー　哀川翔

>>980
普通に読めますが?

>>983
(っ´▽｀)っ
Jan 1 2007とかにならんかね？

>>984
文字化け？

>>985
(っ´▽｀)っ
これは文字化けじゃないか。
細かいことは気にするな☆

いわゆるマクロウイルスとかいうやつのコードの書き方教えて。
ウイルスチェックで引っかかるところを見てみたいだけです。

携帯からたどり着きました。スレ違いだったらすみません。
よかったらご教授願います。多分とても簡単な事だと思うのですが…超初心者です。
ＯＳはＸＰ、Excel2003です。


ファイルＡの内容を、カメラ機能を使って、ファイルＢに取り込もうとしています。
ファイルＡのシート名は１〜３１までの整数です。（1日1シート）
ファイルＢ上でマクロを実行した時、実行日に相当するシートの範囲を読むようにしたいのですが、以下のマクロでは、エラーになってしまいます。手直しして頂けないでしょうか。宜しくお願いします。


Sub カメラのリンクを編集()
Dim i As String
i = Day(Date)
ActiveSheet.Shapes("camera").Select
Selection.Formula "='G:\平成20年\[ファイルＡ.xls]i'!$A$1:$K$60"
End Sub

ここは手直しスレじゃないんだが。
せめてどんなエラーになったか位書こうよ。
あー、シート名が変数i(不適当な名前だw)に入っているのなら、文字列を組み立てないとダメだね。
>988では"i"と言う名前のシートを探そうとしてしまう。

×ご教授
○ご教示

>989、990
文字列を組み立てるというアドバイスの元見直しをして、無事完成しました。
スレ違い失礼しました、「ご教示」ありがとうございました。

質問したいけど構文ここに書くの面どくせえ

・・・

If ActiveCell.Column = 6 Then
Range("A1:A10").Copy ActiveCell
Else
MsgBox "ここは駄目"
End If

・・・

これだと6列目を先頭としてA1〜A10のセルをコピーでき、
6列目以外は入力不可でmsgboxが出るのですが、
例えば6列目〜10列目を入力可能にするにはどうしたら良いでしょうか？

オートシェイプの始点やら終点ってどういう単位？

Sheets(2).Shapes.AddLine(Xs, Ys, Xe, Ye).Select

たとえば、こうやって変数で当てて500から520までかけ。次に520から540までかけ
ってやっても線がつながらんのだが。

>>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

VBAを使用して作成したExcelファイルを立ち上げようとすると、
「問題が発生したため、Microsoft Excel for Windows を終了します。 ご不便をおかけして申し訳ありません。」
というMicrosoftのエラーになり、Excelが開かなくなってしまいました。
中のモジュールを何とか見る方法はないでしょうか？

あるセルにある文字列が入っています。特定の文字列では無いのですが、
この文字列から、条件を満たす物を抽出したく考えております。

具体的には、「*」　で囲まれた文字列を抜き出したく考えております。
（「」で囲まれた物以外を削除）

調べてみたのですが、このような処理は可能でしょうか。
可能でありましたらば、教えてくださいませ。よろしくお願いします。　

regexp

次
http://pc11.2ch.net/test/read.cgi/tech/1212587819/l50

10000ならオマエラの人生幸せ
それ以外なら一生不幸

このスレッドは１０００を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。