Excel VBA 質問スレ Part51

■ このスレッドは過去ログ倉庫に格納されています
1デフォルトの名無しさん (スププ Sd4a-O827)
垢版 |
2017/11/08(水) 11:26:30.13ID:+KUB1/9hd

スレ立ての際は一行目に
!extend:checked:vvvvv:1000:512
と入れてスレ立てして下さい

ExcelのVBAに関する質問スレです
コード書き込みや作成依頼もOK

※関連スレ
VBAなんでも質問スレ Part2
http://mevius.2ch.net/test/read.cgi/tech/1432173164/
Access VBA 質問スレ Part1
http://mevius.2ch.net/test/read.cgi/tech/1328536426/
Excel総合相談所 126
https://mevius.2ch.net/test/read.cgi/bsoft/1496487719/

※前スレ
Excel VBA 質問スレ Part50
http://mevius.2ch.net/test/read.cgi/tech/
VIPQ2_EXTDAT: checked:vvvvv:1000:512:----: EXT was configured 👀
Rock54: Caution(BBR-MD5:0be15ced7fbdb9fdb4d0ce1929c1b82f)
2017/12/10(日) 23:43:42.33ID:05lOR9eq0
>>394
(つづき)
マクロやシート上の把握できていない設計要素の影響を除外するために新規xlsxファイル
で試しました。
前提:評価ブック以外のブックは開かない。
シート1:2000行*50列の表を作成、A-Zの1文字をランダムに埋め、AutoFilter設置。
    書式設定、条件付き書式等は一切行わない。
    入力規則は評価条件とする。(IME制御なしの場合とIME-Offの場合)
    フィルタ実施時は、2列絞り込む。
シート2:空シート

評価用Macro(シート1)
Option Explicit
Dim st As Single, ed As Single

Private Sub Worksheet_Deactivate()
st = Timer
End Sub
Private Sub Worksheet_Activate()
ed = Timer: Debug.Print ed - st
End Sub
(つづく)
2017/12/10(日) 23:44:00.59ID:05lOR9eq0
>>394
(つづき)

評価方法:
1)フィルタ設置のシート1を表示
2)Ctrlキーを押しながら、PgDn→PgUpを連続して押下。
3)Immediateウィンドウで計測時間を確認。
上記を5回程度実施

条件と結果:
Case IME制御なし+フィルタなし ▼平均時間:約70msec
Case IME制御なし+フィルタ-On ▼平均時間:約70msec

Case IME-Off+フィルタなし ▼平均時間:約70msec
Case IME-Off+フィルタ-On ▼平均時間:約7000msec

ちなみに1列フィルタリングした場合は、約1400msec程度でした。

対症療法としては「入力規則使うな」となりそうですが、2〜3日前までは上記
現象は発生していなかったので、、原因療法が知りたいです。

どなたか上記現象分かるかたいらっしゃいませんか?
2017/12/10(日) 23:47:36.15ID:VPQqZskd0
>>396
思い当たるのは、FCUでIMEの挙動がおかしくなったという報告多数な件
2017/12/11(月) 03:47:36.99ID:/hRyHJmR0
>>397
Version1703なのでまだFallは当たってないようです。
2017/12/11(月) 11:20:26.75ID:TIu41blJ0
ホントMSはアップデートなのかウイルスなのか分からんことするよな・・・
2017/12/11(月) 13:06:28.39ID:NoGJiqM0H
>>399
ちなみに職場の環境
 Excel2010 @Win7
 Excel2013 @Win8
では再現しませんでした。
やっぱりなんらかのUpdateが当たったのか、それとも自分でなんかやらかしてるのか、、、
2017/12/11(月) 13:32:28.01ID:pEROMoD00
午前中にメッセージが出てアプデするか? とか聞きゃあがったから「あいよ」ってんで気軽に再起動した
90%ぐらい完了した後で Cannot だってやんの しょーもないから電源落として午後再起動したら
また「アプデするか?」 って もうね、アホかと
2017/12/12(火) 01:03:48.16ID:vtwEo9S/0
Windows
押しつけがましいアップデートメッセージが出て
いいえしまくってたんだけど
ちょっと目を離して風呂入ってたら勝手に合意したことにしてOSインストールされてた

そんな俺が客先で作らされてるのは顧客が一日黙ってたら契約に合意したことになるシステム
2017/12/12(火) 04:17:56.67ID:VGkGFTOK0
質問です。
LastCellって簡単に取得できるのにHomePositionってこれといった決定打がないんですかね?
SendKeys以外で簡単に安定して取得する方法ってありますか?
できればSelectしなくてよい方法で。
404デフォルトの名無しさん (スッップ Sdbf-6IXG)
垢版 |
2017/12/12(火) 11:56:45.28ID:R9+tEHmjd
ADODB.Streamで大きめのテキストファイルを読むときLoadFromFileが重いので、Openの引数でファイル指定してから
ReadTextするようにしたいんですがうまくいきません。
パスをそのまま書いても、"file://C:temp/data.txt"のような書き方をしてもことごとくOpenのところで落ちてしまいます。
どう書けばいいんでしょうか?
ちなみに先頭100行を試し読みするときとかに使いたいです。
2017/12/12(火) 12:18:28.61ID:KlMiw57eM
>>404
それならコード貼ったほうが早い
使い方云々が知りたいだけならググればいいし
406デフォルトの名無しさん (スッップ Sdbf-6IXG)
垢版 |
2017/12/12(火) 12:50:26.86ID:R9+tEHmjd
>>405
スマホなのでちょっと待ってて
2017/12/13(水) 11:40:21.94ID:5F7kXiJk0
名前を付けて保存する際
最近使った“アイテム”が
今週〜,先週〜,しばらく前,という順番で使用履歴の各ファイル名が表示されます。

これを表示させない設定を教えてください。
よろしくお願いいたします。


スペック

OS=Win10
Excel2016
Officeバージョン=1710
2017/12/13(水) 14:40:49.78ID:5F7kXiJk0
↑すいません、質問するべき板を間違えました。ここはVBAでしたね。
他で聞いてみます。
2017/12/13(水) 22:03:05.49ID:lbNGI0B20
チョイ前に変数の宣言が話題になってたから俺も一ネタ言いたい

「redim で変数の宣言が出来る仕様はやめて欲しい」

変数名を間違えた時にエラーで気付けるように普段から変数の宣言を強制してるんだけど、
redim で配列を変更する時に変数名を間違えても
新たな別の変数扱いされてエラーにならないから気付かないことがある

配列変数でも宣言は dim 、要素変更は redim っていう風にしといてくれたらと願ってやまない
410デフォルトの名無しさん (ワッチョイ 9faf-F7Qh)
垢版 |
2017/12/13(水) 23:22:51.89ID:b+I23nON0
Application.GetOpenFilename でファイルのパスを求められることが分かった

Application.GetOpenFilename
Workbooks.Open.Filename:=Application.GetOpenFilename
ってできないことが意味がわらない



あと
Workbooks(Application.GetOpenFilename)ってやるとパス付のでエラーになってしまうこともわかった

Workbookオブジェクトに適当な変数を宣言して iとする
i = Application.GetOpenFilename
i.worksheet()ってできない意味がわからない

i = Workbooks.Open(filename:= ApplicationGetOpenFilename)
i.worksheets()

これならできる意味がわからない
()で戻り値をくくるのはわかる
でもこの場合の戻り値はパス付戻り値であるから Applcation.GetOpen....
はいらないのでは?パス付戻り値ならば
i = Application.GetOpenFilename
でもできるのでは?WorkBookオブジェクト変数だから

誰か答えられる?
2017/12/13(水) 23:34:03.63ID:fRI8/I3E0
そういう言語仕様なので
412デフォルトの名無しさん (ワッチョイ 9faf-F7Qh)
垢版 |
2017/12/13(水) 23:49:56.82ID:b+I23nON0
わりと真面目に答えてくれ

オブジェクト変数に直接パス付のファイル名をぶち込んでエラーになるのが意味わからない

なんのためのオブジェクト変数なんだ

Workbooks.Open(filename:= ApplicationGetOpenFilename)
これもパス付のファイル名なのになんで格納できるんだ?
2017/12/14(木) 00:01:33.96ID:iqnmwrCv0
まず型というものを理解してください
つぎに、プロパティというものを理解してください
つぎに、オブジェクトにはデフォルトプロパティというものがあるのを理解してください
あと名前付き引数に対する理解も必要ですね
VBAではSetでの代入とLet(を省略した)代入では意味が違うので、それもちゃんと区別してください

いちいち全部ここで解説はせんが
このぐらい理解すればたぶん答えはわかるだろ
2017/12/14(木) 00:13:48.84ID:iqnmwrCv0
まじめに答えといてやるけど
>オブジェクト変数に直接パス付のファイル名をぶち込んでエラーになるのが意味わからない
たぶんお前がやってるのは、そのオブジェクト変数のデフォルトプロパティに代入しようとした
で、そのオブジェクトがそれを受け入れないからエラーがでたんだろうな

>Workbooks.Open(filename:= ApplicationGetOpenFilename)
>これもパス付のファイル名なのになんで格納できるんだ?
格納の意味が分からん
ApplicationGetOpenFilename(の結果)をたんにOpenの(filename)引数として渡してるだけ
ApplicationGetOpenFilenameの結果がOpenのfilename引数として適当だからエラーが出なかっただけ
2017/12/14(木) 00:14:33.99ID:FrwGQASIx
パス付戻り値っていう表現が凄い
Application.GetOpenFilenameの戻り値は、パス文字列か、パス文字列の配列か、ダイアログがキャンセルされたときに返されるFalseかのいずれかしかない
パス付って、何にパスがくっついてると理解してるんだろう
パスが戻り値そのものだろう
416デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:18:35.88ID:oVDd8Fug0
>>414
意味がわからん
初心者相手に専門用語で勝った気になるなよ
417デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:21:23.88ID:oVDd8Fug0
>>415
パスってのは
¥C:のことだろ?
openメゾットの戻り値も¥C:ついてるのに
WBオブジェクト変数に格納できる意味がわからない
専門用語でこたえるな わかりやすく答えろ
外人相手に口喧嘩して勝ち誇ってるやつと同じだわ
418デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:23:38.19ID:oVDd8Fug0
workbookのオブジェクト変数のデフォルトプロパティってなんだよ
そこを答えろ
答えろって言わないと答え出て来ねえのかよ
419デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:24:22.55ID:oVDd8Fug0
ちなみにおれはVBA初めて3時間
ここまでの疑問が出るだけすごいと思うけど
2017/12/14(木) 00:24:26.11ID:0XKK4N9O0
>>410
>Workbooks.Open.Filename:=Application.GetOpenFilename
>ってできないことが意味がわ「か」らない

Workbooks.Open Filename:=Application.GetOpenFilename

なら動くんだが、それではダメ?(open と filename の間は半角スペース)

何故かと言えば言語の仕様として
引数はピリオドで繋ぐものではないからとしか言いようがない
(workbooks はオブジェクト、open はメソッド、filename:=~ はその引数)

>i = Application.GetOpenFilename
>i.worksheet「s」()ってできない意味がわからない

変数i が workbook型だとして、Application.GetOpenFilename の戻り値はworkbook型ではない。
戻り値はvariant型なんだけど、キャンセル時に false になるだけで、ファイルが選択されていれば文字列が返される
複数ファイルが選択されてても文字列が配列で帰るだけ
それに、i がworkbook型変数なので set を付けないとダメ
i が variant型変数 なら文字列か false が帰るだけでヤッパリ workbook としての挙動はしない

i.worksheet「s」() っていうのも、worksheetオブジェクトは
既に開いているブックのシートしか指定出来ないから、i がブックとしてオープンしてなきゃ当然ダメ

>i = Workbooks.Open(filename:= ApplicationGetOpenFilename)
>i.worksheets()
>これならできる意味がわからない

set i = Workbooks.Open(filename:= ApplicationGetOpenFilename)
じゃないと動かないよ
理由は前述のとおり
2017/12/14(木) 00:32:01.43ID:FrwGQASIx
>>417
Openメソッドの戻り値はパスではなく、Workbookオブジェクトそのものだ

開いているブックの集まりであるWorkbooksコレクションオブジェクトに、引数Filenameで指定したブックを追加して、戻り値としてそのブックそのものを返す処理だ


何か根本的に勘違いしてるだろ君
422デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:33:36.37ID:oVDd8Fug0
>>420
お前がまだわかりやすいな

ただし
おれはすでに開いているファイルじゃないと操作できないとかは全部知っている
オブジェクト型変数の前にsetステートメントを置くことも知っている

つまり
Application.GetOpenfilename = ファイルを開いた時は文字列が返される
workbook型に返せないのか?
答えはパス付きの文字列で帰って来るためにノーだ
これも知ってる

Workbooks.Open filename:=Application.GetOpenfilename

これも知っている
しかし結果としては
ファイルを選択で開いたパス付き文字列を開く
という命令なはず

同じパス付き文字列なのにworkbook型に格納できないのが意味がわからない
423デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:35:42.03ID:oVDd8Fug0
>>421
ん?なんで?
msgboxで表示されてもパス付きになるよ?
424デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:41:28.15ID:oVDd8Fug0
またも意味不明な現象が起きた

拡張子を指定しなかったのに開いた
拡張子を指定したらなぜかエラーが出た
なんでだ?


https://i.imgur.com/lqUNtRU.jpg
2017/12/14(木) 00:42:52.81ID:FrwGQASIx
>>418
オブジェクトには、特にプロパティ名を指定しないでアクセスする場合に、優先的に参照されるプロパティが決められていて、それをデフォルトプロパティと呼ぶ
オブジェクト型に合わないデータを代入してしまう構文になっているときでも、データの型がデフォルトプロパティの型に適合していればVBAはデフォルトプロパティへの代入として解釈して処理を受け付ける
426デフォルトの名無しさん (ワッチョイ d2af-iA8U)
垢版 |
2017/12/14(木) 00:44:33.92ID:oVDd8Fug0
>>421

Workbooks.Open(filename:= ApplicationGetOpenFilename)
→\C:〜〜〜〜という文字列が返される

ApplicationGetOpenFilename
→これも同じ

なぜ前者はWorkbook変数に格納できて
後者はできないんだ?
427デフォルトの名無しさん (ワッチョイ d2af-iA8U)
垢版 |
2017/12/14(木) 00:45:53.39ID:oVDd8Fug0
>>425
そんなもん知ってるわ
Rangeやcellsのvalueみたいなもんだろ?

Workbookオブジェクトのデフォルトプロパティはなんだ?
2017/12/14(木) 00:48:20.20ID:0XKK4N9O0
>>422
悪いけど>>410 の書き方じゃ分かってるようには見えない
set を付けてない時点でこの人は分かってないんだなと判断されても仕方ない

そして
>Application.GetOpenfilename = ファイルを開いた時は文字列が返される
も間違い
Application.GetOpenfilename は、
あくまでもファイルのパス情報を文字列(或いは false)で返すだけで
実際にブックを開けることはしない
だから正確に書くと
Application.GetOpenfilename = ファイルを「選択した」時は文字列が返される
というべきで、そのブックを開くためにworkbooks.open を用いる必要がある
429デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:51:58.64ID:oVDd8Fug0
>>428
set

オブジェクト変数を代入するとこに扱うステートメント
430デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:53:08.36ID:oVDd8Fug0
>>428
ファイルを開いたっていうのは
選択したって意味なんだが

オブジェクトとOPENメゾットで初めて開く

こんなの知っている
2017/12/14(木) 00:53:19.64ID:0XKK4N9O0
>>428でもまだ不正確だった
より正確に言うと

Application.GetOpenfilename =
「開きたい(あるいは移動、コピー、改名、削除など何らかの操作をしたい)」ファイルを「選択した」時は文字列が返される

ですね
432デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 00:55:08.87ID:oVDd8Fug0
>>431
んなもんしってるわ
キャンセル押されたらフェイルス
ファイルを選択したらパス文字列
2017/12/14(木) 00:56:13.50ID:0XKK4N9O0
>>430
いや、それが分かってるなら何を問題にしてるのかがよく分からない
それと「メゾット」じゃなくて「メソッド」ね
2017/12/14(木) 00:56:39.81ID:pIjJ7/MG0
真面目に答えるんじゃなくて
わりと真面目に答えるように
2017/12/14(木) 00:58:18.78ID:FrwGQASIx
>>418
ちなみにworkbookオブジェクトのデフォルトプロパティは存在しない
存在しないから当然、workbook型に合わないデータは代入できない
436デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 01:00:54.08ID:oVDd8Fug0
>>435
じゃあなんで
workbook.openのパス文字列は入るんですかねえ
437デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 01:01:13.61ID:oVDd8Fug0
ここまで答えなしだが
誰もわからないのか?
438デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 01:01:34.43ID:oVDd8Fug0
おれの質問ってVBAの穴をついた?
2017/12/14(木) 01:04:09.93ID:0XKK4N9O0
質問の意味がわからないんですよね
何が疑問なのか、独自表現を用いずに、
set やなんかも省略せずに正しく動作するコードと
動作しない理由が知りたい動かないコードを書いてみてもらえます?
2017/12/14(木) 01:05:31.95ID:FrwGQASIx
>>426
workbooksは、workbookクラスではない
別のオブジェクトのクラスだ

それから、さっきも書いたが、Openメソッドの戻り値は引数で指定されたパスを持つWorkbookオブジェクトなのであって、Openメソッドによってパス自体が戻ってくる訳ではない
パスを返してくるApplicationクラスのGetOpenFilenameメソッドとは全く働きが違う
プロパティやクラスや引数の名前で何となくbookとかfileとか付けばパス付のWorkbookオブジェクトが返ってくるものと混同してるようだが、きちんと区別しないといけない
2017/12/14(木) 01:13:20.35ID:FrwGQASIx
>>436
Openメソッドが要求する名前付き引数Filenameに、GetOpenFilenameで取得したパスを設定して、その結果新しく開いたWorkbookオブジェクトが返っているからだよ
このFilenameはApplication.GetOpenFilenameメソッドの戻り値ではあるけど、Workbooks.Openメソッドの戻り値ではない
Worksheets.Item(Index:=ActiveSheet.Name)みたいな処理と一緒だと言えば少しは分かるか?
2017/12/14(木) 01:13:59.17ID:FrwGQASIx
>>438
突いてない
典型的な初心者の質問
2017/12/14(木) 01:17:18.86ID:LaUulqGP0
典型ではないな
低次元な初心者の質問
2017/12/14(木) 01:22:45.67ID:FrwGQASIx
たぶんこの質問者は、コレクションを知らないタイプだな、
それから、式に含まれるプロパティ名やメソッド名をオブジェクトのクラス名と同一視しているタイプだろう
2017/12/14(木) 01:34:07.25ID:n2gI2QxJ0
たぶんハイパーリンクでパスが表現される事が多いところから、
パスが文字列とは異なるデータ型を持つ何かだと勘違いしてるだけじゃないの?
446デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 07:32:56.86ID:oVDd8Fug0
>>441
workbooks.open filename:=Application.GetOpenfilename

この場合はworkbooksオブジェクトに選択したパス文字列が格納されるのか?
だからworkbook型に格納できるのか?
447デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 07:37:06.65ID:oVDd8Fug0
>>444
ん?
workbooks
worksheets
rows

これはコレクションだろ?
コレクションはオブジェクトの最上位

プロパティはオブジェクトの何?
メゾットはオブジェクトに命令

違うか?
448デフォルトの名無しさん (ワッチョイ d2af-8sno)
垢版 |
2017/12/14(木) 07:40:17.60ID:oVDd8Fug0
マジでわかりやすい答えがない
2017/12/14(木) 08:30:04.65ID:mohvOYX1x
>>446
君の言う「格納」は、コレクションへのオブジェクトインスタンスの追加、プロパティ値の設定、変数への代入、引数の受け渡し等がごちゃごちゃになっていると思う
まず、Workbooksコレクションに、データの代入はできない
WorkbooksコレクションはWorkbookオブジェクトの集まりを要素に持つコレクションオブジェクトだから

それから、Workbooks.Open Filename:=Application.GetOpenFilenameという構文は、Workbook型の変数に値を代入しているわけではない
Filenameという名前付きで定義されたOpenメソッドの文字列型の第一引数に値を渡していて、その結果としてOpenメソッドがWorkbookオブジェクトを返しているわけで、オブジェクト型変数への代入ではない
2017/12/14(木) 08:45:33.01ID:YV9D93CW0
>>447
コレクションは最上位じゃない
一番上にあるのはオブジェクト
451デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 08:46:43.07ID:QIiUylbtp
>>449
いやそんなのしってるんだけど

dim i string
dim wb workbook

application.Getopen filename:=で目的のファイルを開く
そしたら「¥:目的のワークブック.xlsx」が文字列として帰って来る
workbooks.open filename:=目的のファイル
これで初めて目的のファイルが開く

ここで本題
どちらも目的のファイルのバス名が返ってきているのに
set wb = application.GetOpen filename
だとエラーで
set wb = workbooks.open (filename :=目的のワークブック.xlsx)

これならwbオブジェクト型変数に代入される意味がわからない
これをはっきり答えろ
わかりやすくな
452デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 08:47:18.91ID:QIiUylbtp
>>450
一番上

最上

日本語やり直したほうがいい
2017/12/14(木) 09:00:03.55ID:n2gI2QxJ0
>>451
Set wb = Application.GetOpenFilename

は、String型をWorkbook型のポインタへ代入しようとしてエラー吐いてる。

Set wb = Workbooks.Open(Application.GetOpenFilename)
Set wb = Workbooks.Open("目的のワークブック.xlsx")

は、OpenメソッドにString型変数を渡しているから機能する。
454デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 09:02:02.66ID:QIiUylbtp
>>453
workbook型のポインタってなに?
これがわかればすっきり
2017/12/14(木) 09:02:04.79ID:CHPwg0pDx
>>447
コレクションはオブジェクトの最上位、という発想がそもそも間違い
コレクションは子要素に追加されているデータやオブジェクトへのアクセス等を提供する、子要素からは独立したオブジェクトだ

更に、WorkbooksコレクションオブジェクトはWorkbookオブジェクトのみを要素に持つようにあらかじめ最適化された規定のコレクションオブジェクト
456デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 09:05:19.87ID:QIiUylbtp
>>453
WB型変数に文字列代入は不可
メゾットの戻り値の代入は可能ってこと?

なんで?
2017/12/14(木) 09:05:51.56ID:YV9D93CW0
>>452
日本語だけ知ってても言語仕様を正確に説明する難しいんだよ

コンピューター業界では「上位」などの言葉には特別な意味を持たせる場合もあるし、
とくに相手がド素人だと、言葉の意味から説明するのも面倒だから、あえて上位という単語は避けた上で
なんとなく通じてくれそうな「上」って言い方をしたんだよ

お前の態度が気に入らないからワッチョイ Spc7はNGするわ
人に何か質問する時は最後までていねいな言葉を使え
458デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 09:07:28.47ID:QIiUylbtp
>>457
うんこーwwwwwwwwwwうんこーwwwwwwwwww
2017/12/14(木) 09:08:52.24ID:CHPwg0pDx
>>451
そもそもApplication.GetOpenFilenameはブックを開いてブックへの参照を返すメソッドじゃなくて、ユーザーにダイアログ画面上で選択させたファイルのパスを返すメソッドなんだが
メソッド名で混乱してるだろ君
460デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 09:11:20.55ID:QIiUylbtp
>>459
いやしってるけど

キャンセルが押されたらフェイルスだし
選択したらパス名が返って来る

何回言えば気がすむんだよ
461デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 09:12:47.30ID:QIiUylbtp
Openメゾットはただブックを開くだけだろ?
ただし 引数を戻り値として得られる
つまり 開いたファイル名がOpenメゾット内にある

違うかい?いい線いってる?
2017/12/14(木) 09:13:02.91ID:n2gI2QxJ0
>>456
なんでも何もデータ型が一致するかどうかが問題であって、メソッドの戻り値の型は一致するってだけ。

たぶんJavaScriptから始めたせいで認識がおかしくなってるんだろうけど、
普通はデータ型が異なる変数同士の代入は出来ない。
2017/12/14(木) 09:14:18.68ID:CHPwg0pDx
この質問者みたいな人が言語仕様について思い込みや勘違いをしたまま共用マクロを組んだりすると、会社にとって迷惑なだけなんだよな
作ったマクロを他人と共有しないことを祈るのみ
2017/12/14(木) 09:20:19.35ID:CHPwg0pDx
>>460
それ俺がきのう説明したことだよねw
オブジェクト型変数にGetOpenFilenameから返った文字列型データやデータ配列を設定しようとしてるのがおかしいんだがw
データ型とか一回学んだ方が良いと思うよ

それから蛇足だけど、フェールスじゃなくて、フォルス、フォールス、ファルスの何れかの表記にしないと、Falseのことだと理解してもらえないことが多いと思うよ
2017/12/14(木) 09:25:08.03ID:CHPwg0pDx
>>461
引数の文字列は戻り値にならない
Openの戻り値はWorkbookオブジェクトの実体だ
Workbookオブジェクトの実体とパス文字列はイコールじゃない

それから、メゾットじゃなくてメソッドな
あんまり特徴的な言葉づかいしてるとメゾット君と
フェールス君とか呼ばれたりするかもしれないから気を付けなよ
466デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 09:30:34.82ID:QIiUylbtp
>>465
実体でなに?どころどころで補足質問しねえといけねえのかよ
467デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 09:31:25.92ID:QIiUylbtp
>>462
変数同士?
workbook型あとは何?
これも補足質問
468デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 09:32:51.20ID:QIiUylbtp
>>464
データ型の参考ページは?
猿でもわかるやつ
2017/12/14(木) 12:17:27.13ID:7XekaZVWx
>>468
その言い方は猿に対して失礼だぞメゾット君

WordやPowerPointのVBAと違ってExcelは「Excel VBA データ 型」でググれば腐るほど情報が出てくるから、好きなページを読んで出直してきたらいいさ
インスタンスもググってみたらいいよ
2017/12/14(木) 12:34:50.44ID:DWbie50BM
>>466
Workbookの実体とは開いて実行しているエクセルブックのことだよ。ブックはVBAが管理しているメモリ上のデータではないってこと。そこにアクセスする為の情報だけがWorkbook型変数には格納されている。
これ以上はググったほうがいいな。メゾットちゃんには言葉だけでは通じないみたいだし。
2017/12/14(木) 12:36:44.73ID:bra/P7/Ad
どう考えてもこいつは型も文法も戻り値も理解できてないだけだろ
2017/12/14(木) 12:45:31.15ID:PlqHEg1vH
インスタンスはお湯かけて3分で完成するよ

(´・ω・`)b
2017/12/14(木) 13:37:10.14ID:D0PQd/9/a
体系だてた答えがほしいならオブジェクト指向あたりの本読んだ方がいいんじゃねえの
正確にはオブジェクト指向じゃないけどクラスとインスタンス(やそれにくっついてるメソッドやプロパティ)の関係を理解するにはそれがはや道だわ
ここは教科書じゃないから
474デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 14:17:01.84ID:QIiUylbtp
なんでぱぱっと答えられねえの?頭悪いの?
475デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 14:18:03.10ID:QIiUylbtp
>>470
ふーん
開いてから格納する

これだけだよね?詰まる所は
476デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 14:27:22.00ID:QIiUylbtp
Openメソッドで開かないと
workbook型に入らない
2017/12/14(木) 14:28:58.06ID:oiVEYMPnp
それは結果に過ぎない
ちゃんと原因や理屈を押さえないとまた同じことで詰むぞ
478デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 14:49:26.55ID:QIiUylbtp
>>477
それをわかりやすく教えて
ほんとにわかりやすく
2017/12/14(木) 14:51:48.29ID:/xE3TN/oa
>>478
無理だよ
480デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 15:05:19.17ID:QIiUylbtp
>>479
別の言葉に置き換えればいいだろ?
2017/12/14(木) 15:22:14.17ID:yqG/N6/gM
ID:QIiUylbtpはVBA以外の言語知ってるの?
それともExcel VBAで初めてプログラミングに触れましたって人?
お前の学習レベルがわからないからお前でもわかるように説明できないんだ
2017/12/14(木) 15:43:20.73ID:Sk339KZTa
ここには、彼の疑問に答えられるような人はいない。

こんぴゅうたーのでんげんをいれるとどうしてえくせるがうごくのかをせつめいするのはむずかしい。
でんきにはつうでんしてるときとつうでんしていないときがあるのでそれをりようしてぜろといちをくべつできる。
ぜろといちをくべつできればにしんすうをりようして...
2017/12/14(木) 17:51:08.32ID:Gx1HQ3cua
大体教えてもらう立場のやつがとる態度じゃないからまともに取り合ってもらえると思ってる時点で頭が悪い
2017/12/14(木) 18:34:15.80ID:Dm16MIru0
初心者なのに態度悪いからNGにしたわ。
教えてもらう態度じゃないよね。子供ならまあ納得だけど。
2017/12/14(木) 19:23:24.80ID:IXGcMbV0a
そもそもWorkbooksに指定するのはエクセルファイル名じゃない。
ブック名だ。
開いたブックのブック名とファイル名が同じになるから勘違いしてる奴もいるかもしれんが。
486デフォルトの名無しさん (ワッチョイ 5303-6+fO)
垢版 |
2017/12/14(木) 19:24:50.30ID:oezENCsV0
同じだったらファイル名でええやんw何鼻息荒くしてんの?w
2017/12/14(木) 20:32:08.46ID:g1PrWAQxx
>>485
恐らく>>484はWorkbooks.Itemの引数について話してるんだろうだが、君にはそのあたりが分からんみたいだな
2017/12/14(木) 20:33:08.02ID:g1PrWAQxx
>>487
安価間違えた、これは>>486
2017/12/14(木) 21:01:41.06ID:bra/P7/Ad
>>453
をもとに考えてみた

お金を入れるとカップにジュースが注がれる自販機を思い浮かべるんだ

Set wb = 'ジュースが入るカップ
Workbooks.Open( _'お金を判別してボタンが押されるとジュースを出す回路
Application.GetOpenFilename _'お金
)
→お金を入れてボタンを押したらカップにジュースが注がれる

Set wb = Application.GetOpenFilename
→カップに直接お金を入れて飲めないと騒ぐあほ

どうだ!?
2017/12/14(木) 21:06:22.48ID:zDxHi8mM0
>>451
お前バカだろ
変数wbはただの入れ物
workbook型しか入れられない入れ物にString型入れようとしてんだぞ?
これでわからないならただのバカだから二度と来るな
2017/12/14(木) 21:25:56.75ID:oezENCsV0
>>490
おまえのカアチャンは誰でも受け入れるのにwbって意外と固いんだな
492デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 21:27:02.90ID:QIiUylbtp
>>490
うん
それはしってるよ
でもworkbooks.Openでも同じだよね
文字列帰って来るよね
493デフォルトの名無しさん (ササクッテロラ Spc7-8sno)
垢版 |
2017/12/14(木) 21:32:46.73ID:QIiUylbtp
application.getOpenfilename
→あ.xlsxを選択
C:¥あ.xlsx が帰って来る

workbooks.Open filename:=application.getOpenfilename(つまりC:¥あ.xlsx)

ん?どっちもパス付きのブック名じゃねえの?
ってことをいってる
2017/12/14(木) 21:55:08.02ID:5D+dY0yO0
>>493
文字列として返ってきたから文字列型と思ってるなら、一回workbook型をウォッチに入れてみたら?
ツリー形式でオブジェクトの、中身が見れるから全然別ものだとわかるはず
■ このスレッドは過去ログ倉庫に格納されています
5ちゃんねるの広告が気に入らない場合は、こちらをクリックしてください。

ニューススポーツなんでも実況