[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2ch.scのread.cgiへ]
Update time : 02/25 03:25 / Filesize : 313 KB / Number-of Response : 1018
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

Excel VBA 質問スレ Part78



1 名前:デフォルトの名無しさん mailto:sage [2022/10/30(日) 13:43:16.31 ID:6yf2E1Gz0.net]
!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512
↑同じ内容を3行貼り付けること

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

次スレは>>980が立てること
無理なら細かく安価指定

※前スレ
Excel VBA 質問スレ Part77
https://mevius.5ch.net/test/read.cgi/tech/1658009255/

-
VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured
VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

862 名前:デフォルトの名無しさん mailto:sage [2023/01/22(日) 18:51:11.61 ID:vQS42HbD0.net]
>>817
レスサンクスです。
ということはYukkuriが100人いたら、
Dim Yukkuri?? As New Dictionaryを100行要るてことになるてこと?
timeline.Add Yukkuriのところで、timelineが使ってるメモリが追加でアロケートされ、
そこに連想配列が追加されるていう動きにならんのかね?
それか連想配列の実体をコピーできるとか。

863 名前:デフォルトの名無しさん mailto:sage [2023/01/22(日) 18:52:29.42 ID:zZKA7THFr.net]
ワタシフサフサしてるので

864 名前:デフォルトの名無しさん mailto:sage [2023/01/22(日) 18:56:56.52 ID:pQuel4xur.net]
>>846
ところで会社で嫌われてない?
その方が心配だわ

865 名前:デフォルトの名無しさん mailto:sage [2023/01/22(日) 19:04:19.40 ID:uL/qufmv0.net]
日曜日に仕事?家に持ち帰りならブラック企業だな

866 名前:デフォルトの名無しさん mailto:sage [2023/01/22(日) 19:13:06.03 ID:5nd4WcY/0.net]
>>848
別の話だろ
Excelと販管ソフトに個々に入力してるから安心とか言うならそれは単に二重入力してミスを見つけてるだけの話

>>851
まあこんなことを言い出すやつなんだろうけどw

867 名前:デフォルトの名無しさん mailto:sage [2023/01/22(日) 19:20:26.34 ID:5nd4WcY/0.net]
>>849
だから何をやりたいのかいまいちよくわからんけど100個コピー作りたいならループで回せばいいだけ
新規のDictionaryはループ中で確保する
timeline.Add Yukkuri
Dim N As Long
Dim Yukkuri1 As Dictionary
Dim Key As Variant
For N = 1 To 100
Set Yukkuri1 = New Dictionary
For Each Key In Yukkuri.Keys
Yukkuri1.Add Key, Yukkuri(Key)
Next
timeline.Add Yukkuri1
Next

868 名前:デフォルトの名無しさん mailto:sage [2023/01/22(日) 19:55:07.24 ID:pQuel4xur.net]
>>853
2つにそれぞれ意味があるから良いだろ
ソフトは客先に納品書や請求書をプリントしたり、EXCELは社内の全ての管理をしやすいように情報付与、そしてその2つが在る事でどちらのかの入力ミスを防げる
この仕組みで会社が儲かってるんだからケチ付けられんわ俺も

869 名前:デフォルトの名無しさん mailto:sage [2023/01/22(日) 20:04:58.23 ID:xRK/d49A0.net]
>>814は恐らく連想配列が欲しいわけではなく、
javascriptやpowershellにあるような動的なプロパティが欲しいんだろう
VBAではそういう便利なものはないので基本ノードデータにジャグ配列を使って
ノードの先頭にプロパティ名に相当するタグを付けていった方が記述量的にも混乱が少ないと思われる

870 名前:デフォルトの名無しさん mailto:sage [2023/01/22(日) 20:21:20.32 ID:xRK/d49A0.net]
>>814の意図を汲んだデータをジャグ配列のノードで表記すると恐らく以下の様になる
dim timeline_root
timeline_root = array("timeline" _
,array("Yukkuri", array("Name", "霊夢"), array("serif", "霊夢です")) _
,array("Yukkuri", array("Name", "魔理沙"), array("serif", "魔理沙だぜ")) _
)
配列の要素0に必ずタグ名が入るようにすれば、HTMLのDOMツリーのように一環した探索ロジックが組める



871 名前:デフォルトの名無しさん (ワッチョイ bf3d-Sc6R) mailto:sage [2023/01/22(日) 23:17:51.08 ID:vQS42HbD0.net]
>>857
やろうとしてることは、ゆっくりムービーメーカー4の定義ファイルをVBAで編集すること。
ゆっくりムービーメーカー4の定義ファイルはJSONになってて、
VBAではJSONが使えないから、誰かが組んだVBA-JSONを使うと
JSONがVBAのコレクションやディクショナリー(連想配列)で作られたデータになる。
そこなかで、セリフが定義されてるを連想配列を複製してセリフ書き換えてくてことをやってるんだけど、
VBAのSETて参照するだけで、その参照したものを上位の配列にaddしても、
参照先情報みたいなものがaddされるだけで、別メモリーの情報がaddされるわけじゃない。
ただ、試行錯誤していたら
一旦同じ連想配列をaddしたものを作って、
それをjsonにして、またそのjsonを連想配列に戻してやれば、
別メモリが割り当てられた連想配列が出来上がった。
そのあとは個別に要素を書き換えられる。
javascriptとかは
.配列.push({...Yukkuri[0]})
とかやれば行けたんだが、VBAは無理なのか。

872 名前:デフォルトの名無しさん [2023/01/23(月) 00:40:24.32 ID:g2a0jdgy0.net]
こんどはjavaかw
できるならそっちでやれよ

873 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 02:01:54.23 ID:8zQTqYpQ0.net]
>>858
処理対象がjsonなら最初からそう書けばいいのに
いくつか手段はあるけどVBAでやろうとすると結局面倒だし特に理由が無いなら他を検討してみては
VBA-JSONの使い方の話なら俺は知らん

874 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 05:38:36.83 ID:yam+YnrUa.net]
>Excelと販管ソフトに、個々に入力してるから安心
もし、この2つが異なった値なら、システムが破綻しているw

オリジナルは1つのみ!
そして、バックアップ用のコピーを持つべき!

875 名前:861 mailto:sage [2023/01/23(月) 05:45:42.29 ID:yam+YnrUa.net]
例えば、銀行のシステムでも、2つのオリジナルを持たない。
3人が同時入力して、多数決でオリジナルを決める

サーバーでもそう。偶数個のノードにしない。
1:1, 2:2 などの分断が起きて、どちらがオリジナルか判断できなくなる

必ず、奇数個で判断して、オリジナルを決める。
そして、オリジナルのバックアップ用のコピーを持つ

そうしないと、システムが破綻する

876 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 05:47:16.87 ID:7g54Dlndr.net]
>>861
知らんがな
システムの良い悪いの判定なんてお前らに求めて無い事を察しなさい

俺以外の社員含めて理不尽な事をやってるなと思いながら仕事をしてるんだから

70歳の引退予定の上司に言ってくれ

そいつがいなくなればスッキリさせる

877 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 05:53:04.08 ID:7g54Dlndr.net]
>>862
例えば3人で販管ソフトに入力したとして
その販管ソフトの仕様により、会社の必要とする情報を持てない場合はどうするんですか?
そもそも一人しか人的資源が無い場合はどうするんですか?

878 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 06:43:46.30 ID:iLyXDG2rH.net]
>>872さんはキーワードで所望の範囲指定はできたのでしょうか?

879 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 06:47:14.18 ID:7g54Dlndr.net]
>>872
答えな

880 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 07:03:42.58 ID:7g54Dlndr.net]
>>865

変数を定義して範囲の右下のキーワードを拾って

ActiveSheet.PageSetup.PrintArea =

のところにその定義した変数を入れてやるという



881 名前:理屈で合ってますよね?

後はフサフサでも分かるEXCEL VBAの本が到着してから勉強します
[]
[ここ壊れてます]

882 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 07:11:24.85 ID:iLyXDG2rH.net]
よかったです、がんばってください!

883 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 08:50:43.95 ID:rT2ytU3d0.net]
>>858
> VBAのSETて参照するだけで、その参照したものを上位の配列にaddしても、
> 参照先情報みたいなものがaddされるだけで、別メモリーの情報がaddされるわけじゃない。
だから新規に作ってコピーしなよって書いたのに...
コードまで書いたのに無視するんならもうさじ投げるわ

884 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 09:10:22.34 ID:+DM8uE5N0.net]
>>869
新規に作るていっても、複雑な連想配列の塊をどうやって作る?
サンプルはたかだなNameとserifしかキーがないけど、
キーがいっぱいある構造のデーターをコード内でコピーするロジックを書くのは無理だと考える。
しかもその構造が動的だったらお手上げ。

885 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 09:18:38.98 ID:0EjNvA6Wd.net]
質問スレに回答してくる人は善意でやってるだけで最終的に自分で解決できないならあきらめろって話

886 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 09:32:51.14 ID:QZVEgBP9a.net]
>>870
> キーがいっぱいある構造のデーターをコード内でコピーするロジックを書くのは無理だと考える。
> しかもその構造が動的だったらお手上げ。
お前にはお手上げなだけだろw
>>854 に "Name" とか "serif" なんて書いてない、キーを動的に取得してコピーしてることすら読み取れないレベルなら諦めたほうがいいと思うよ

887 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 09:42:01.99 ID:q/YAUd9Kd.net]
マクロでやりたいなら行数が最大になるパターンで書式作っておいて、そこにデータ入力、不要な行の削除でそのまま印刷すればよくね?

888 名前:デフォルトの名無しさん (ワッチョイ bf3d-Sc6R) mailto:sage [2023/01/23(月) 09:55:52.06 ID:+DM8uE5N0.net]
>>872
すまんできたわ。
ありがとう。
Set Yukkuri1 = New Dictionary
を書く位置を間違えてた

889 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 13:24:02.41 ID:2y89VdvQ0.net]
またVBAが壊れた。
プロシージャの中でオブジェクト変数に割り当てる
ワークシート名やクエリー・テーブル名を
日本語にしているのはマズい?

890 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 15:15:51.75 ID:cuqAJLzI0.net]
インターネットが壊れた



891 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 17:40:15.92 ID:zqGzpVPE0.net]
vbaが壊れるという表現が分からない
プログラムは組んだようにしか動かない

892 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 18:35:46.07 ID:2y89VdvQ0.net]
先週までは問題なく動いていたブックを開くと、
すぐExcelが落ちて回復が入ってしまい、
回復ブックを開くと、プロシージャがモジュールごと丸々なくなっていた。

ワークシートのクエリーやテーブル、計算式やグラフは壊れていなさそうで、
新たにモジュールを作り直して
バックアップを取っていたプロシージャの記述をそのまま貼り付けたら、
一応、VBAも動くようになった。

過去には新たなモジュールすら作れなくなったことも。

893 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 19:12:29.48 ID:g2a0jdgy0.net]
自力で解決した自慢ですね、わかります

894 名前:デフォルトの名無しさん (ワッチョイ 53da-Jpma) mailto:sage [2023/01/23(月) 19:45:05.26 ID:GmkrhCzJ0.net]
過去に学んでこの際だからぜんぶ変えてしまおう またいつアプデ地獄に巻き込まれるか知れたもんじゃ無いし
https://qiita.com/Q11Q/items/7a9d4c89726cfaa7abd6

895 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 20:16:53.47 ID:iLyXDG2rH.net]
「VBAが消えてしまった!マクロが壊れて動かない!」
ってな感じで検索してみたら?

896 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 20:31:12.87 ID:XEd9VR/30.net]
ACCESSで、NLSの問題でカナ含むVBAモジュールが開けなくなるってのはあったな

897 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 21:06:30.67 ID:2y89VdvQ0.net]
>>881
ああ、そういえばIMAGE関数が家庭向けサブスクにも配布されたからと、
日曜日にExcelをバージョン2301に更新したんだった・・・

898 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 21:23:58.29 ID:7qHnsy280.net]
確認したけど2212が最新で更新できなかった

899 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 21:28:06.31 ID:c8LJJic2H.net]
NAME?

900 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 21:37:36.60 ID:2y89VdvQ0.net]
これが原因かどうかはまだ分からないけど。
https://i.imgur.com/49fEgC7.png

Office Insiderには参加していない。



901 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 21:54:37.35 ID:c8LJJic2H.net]
>>886
10年ぐらい前、変数を日本語名にしてると一切動かなくなるってバグがあったな
確かACCESSだった
変数を日本語名にしても、あまりいい事はないと思う

>>878
あと、この方法はあまり良くない
一度壊れたブックは、内部的にゴミデータが残っている可能性がある
使いまわすと、そことバッティングする可能性がある
新規ファイルを作り、シートを一つずつコピー、vbaもテキスト単位でコピー、
といった感じで作り直した方が良い
めんどくさいけど、やっておいた方がいいよとは言っておく

902 名前:デフォルトの名無しさん mailto:sage [2023/01/23(月) 21:59:43.45 ID:2y89VdvQ0.net]
>>887
> といった感じで作り直した方が良い

やっぱり・・・orz

903 名前:デフォルトの名無しさん mailto:sage [2023/01/24(火) 03:50:07.79 ID:ID+MP23U0.net]
ドイツのプログラマーが、Selenium、WebDriverを使わずにEdgeを直接制御するクラスを作ってるのを見つけた
試したらとりあえず動いたんで報告
https://www.codeproject.com/Tips/5307593/Automate-Chrome-Edge-using-VBA

動作テスト中にはまった点を書いておくと、裏でEdgeのアップデートチェックが走ってるとエラーが出て止まる
これだけ殺せば動く
taskkill /f /im msedge.exe
taskkill /f /im MicrosoftEdgeUpdate.exe

あと、Edgeの起動オプションを
--remote-debugging-pipe --disable-automation
に変えるとコマンドラインウィンドウが出なくなる

904 名前:デフォルトの名無しさん mailto:sage [2023/01/24(火) 14:18:41.94 ID:kQQ7KETY0.net]
Dim a As Long
Dim b As Short

905 名前:デフォルトの名無しさん mailto:sage [2023/01/24(火) 14:22:05.82 ID:kQQ7KETY0.net]
Dim a As Single
Dim b As Double
Dim c As Triple

906 名前:デフォルトの名無しさん mailto:sage [2023/01/24(火) 20:20:19.23 ID:Fm53fhAfr.net]
フサVBAの本が届いた~
分からないとこはよろしく

907 名前:デフォルトの名無しさん mailto:sage [2023/01/25(水) 00:33:41.40 ID:E3f+ZKf20.net]
>>889
どうしてわざわざEdgeをチョイスするのかと

908 名前:デフォルトの名無しさん mailto:sage [2023/01/25(水) 01:52:23.37 ID:WwTOH1I60.net]
Edgeと言いながらプロトコル的にchronium系共通だし
OSに元から入ってるEdgeならIE難民にはちょうどいいんじゃね

909 名前:デフォルトの名無しさん mailto:sage [2023/01/25(水) 11:18:39.60 ID:PxGM72CY0.net]
他社との業務連携用途とかだと他の選択肢が無かったりする

910 名前:デフォルトの名無しさん (ワッチョイ cfda-88l+) mailto:sage [2023/01/25(水) 11:41:19.68 ID:qyEQLwkW0.net]
自分にできないことを引き受けるから失敗する



911 名前:デフォルトの名無しさん mailto:sage [2023/01/25(水) 14:14:51.65 ID:uj/UrXzd0.net]
できるだろうって思ってガンガン仕様変更されても

912 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 07:02:58.95 ID:QQqpl7Qdr.net]
質問です

VBAを使ってこのスレの人にアンケートを取りたい

皆さんは文系ですか?理系ですか?
もともとプログラミング出来る人ですか?
それとも経理とか必要に迫られて覚えた方ですか?

913 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 07:44:32.02 ID:im4j/4Ys0.net]
>>898
マ板でやれ

914 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 08:08:19.42 ID:QQqpl7Qdr.net]
マ板って何?
包丁切れますか?

915 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 08:12:22.27 ID:jr7Apji9H.net]
無意味なアンケート

916 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 08:14:59.84 ID:jr7Apji9H.net]
文字列の演算をエラーにする方法は無いでしょうか

Sub foo()

Str a
Str b
Str c

a = 1
b = 2
c = a + b
Debug.Print c

End Sub

917 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 08:40:12.57 ID:InTdWzkF0.net]
c = a - b

918 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 08:47:05.40 ID:jr7Apji9H.net]
>>903
お、マイナスだとエラーになるんですね!
・・・ならんやないかーい

919 名前:デフォルトの名無しさん [2023/01/26(木) 09:03:16.60 ID:N0DN9EFmd.net]
皆さんはお仕事何されてますか
事務をやって三年、仕事を楽にするために始めたExcelVBAは人並みに身についた気がしますが
ただの事務では給与が足りずプログラマに転向するには経験が浅いのです

920 名前:デフォルトの名無しさん [2023/01/26(木) 09:11:16.84 ID:NYppQtUx0.net]
エクセルのvbaエディタ?がすごくつかいずらくて、
vsCodeでvbaが記述できるxvbaというツールを利用しようと試みています。
ですが、
エクセルで書かれたvbaの日本語文字が、vsCodeで読み込むと文字化けしてしまいます。
おそらく、エクセルの方のエディタがUTF-8ではないのかと思いますが。
このあたり、経験されているかた。どのように対処されていますでしょうか?
どうぞアドバイスください。



921 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 09:44:15.86 ID:eGur5fW5M.net]
>>906
よく分からんけど逆にVSCでCP932使えば良いのでは?

922 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 10:08:42.84 ID:UvNszdC2d.net]
>>902
質問の意味が分からんけどそもそもabcをStringにしてるのはなぜ?
c = a + bに3と戻したいならc = Val(a) + Val(b)とでもすれば

923 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 10:40:51.75 ID:im4j/4Ys0.net]
> Str a
> Str b
> Str c
なんていう謎の言語はスレ違いかと

924 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 11:00:07.24 ID:UvNszdC2d.net]
>>905
スレ違いです

925 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 11:10:42.36 ID:JQ22Y2sI0.net]
>>905
転職なら早い方がいい、年齢が若ければ新しい職場にもすぐ慣れるだろうから

926 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 12:32:00.38 ID:Y5eC8vQ8M.net]
>>902
エラーにするってのがよくわからんが
個人的にはc=a+b以降をしたのようにする。

If vartype(a) = vbstring or vartype(b) = vbstring Then
Debug.print "エラー"
Else
c= a + b
Debug.print c
End If

End Sub

>>908
a=1 と直接書いてるけど本当は
a=どっかのセルの値にしたいんじゃね?
で、そのセルには数値以外が入ってる可能性があるから
文字列ならエラーにしたいんじゃないかと。

>>909
文字列に変換するstr関数を使いたかったんじゃね?
書き方間違えてるから謎の言語になってるけど。

927 名前:デフォルトの名無しさん [2023/01/26(木) 12:41:55.63 ID:NYppQtUx0.net]
Transposeで作る配列の
一番最初の要素の添字は0じゃなくて、1であってます?

928 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 12:53:54.77 ID:XU6i0xq00.net]
>>902
(1)たとえセルの書式が文字列でも
(2)数字っぽい内容だと
(3)勝手に数値型に変換されてしまう
https://i.imgur.com/0xrxf44.png

何がやりたいのか、ぼかさずに具体的に説明してくれないと無理

929 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 12:55:07.08 ID:jr7Apji9H.net]
>>908
単純にコードのミスを検出したいだけなんです
変数名を間違えた場合の保険程度のつもりなんです

>>909
すいません
別言語触ってて何もかも間違えました
変数宣言dim a as stringのつもりでした

Sub foo()

Dim a As String
Dim b As String
Dim c As String

a = 1
b = 2
c = a + b

End Sub

930 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 13:02:48.18 ID:bIyafktir.net]
>>915
それなら素直にlongで宣言するべきでしょ
変数名間違えた時の保険って、紛らわし変数名にするなって話だし
変数名間違えたときのための保険って言い出したら何も出来ないじゃん
じゃあその「変数名間違ってたときの確認のためのコードの」変数名が間違ってたらどうするの?
その確認のための変数名確認のためのコードをつけるのか?
それが間違ってたら?
確認のための変数名確認のための変数名確認のためのコードをやるの?
って話になる



931 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 13:11:07.62 ID:jr7Apji9H.net]
>>916
逆で、文字列を数値として使ってしまった場合に検出したい
単にタイポ時の保険としてエラーが起こってほしいってだけだよ
vbaに無いなら仕方ない、そういう言語なんだなってだけで
別にそこには期待しないよ

932 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 13:21:15.99 ID:UvNszdC2d.net]
少し上にいた大量にレスしてた奴みたいなおかしな質問者もいるし
適当に質問しても回答者が頑張ってくれるだろみたいな考えの質問者が多すぎなんだよ

933 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 13:31:14.65 ID:XU6i0xq00.net]
>>915
とりまOption Explicitは入れとけ
それ以上はVBA単独ではどうにもならん
型安全な処理系と組み合わせろ

934 名前:913 [2023/01/26(木) 13:32:06.85 ID:NYppQtUx0.net]
ググって解決しましたが。
https://qiita.com/ShortArrow/items/0cf655aaebf0f253a0d4
何故に1から。。

935 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 13:35:53.75 ID:bIyafktir.net]
>>917
あのさぁ、自分の説明が下手くそなくせにできないのは他人のせい、言語のせいにするのはよくないぞ
単にタイプミスって言っても自分がコード書くときにミスしないようにしたいのか、使う際にinputBox等で入力させるときにミスをなくしたいのかで全然違うだろ
エスパーじゃないんだから質問するならもっと具体的にしろよ

936 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 13:39:36.95 ID:XU6i0xq00.net]
>>920
ワークシートが1行目スタートだから

937 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 14:28:02.25 ID:jr7Apji9H.net]
>>921
いやinputboxなら全部文字列だろ

938 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 14:50:16.50 ID:UvNszdC2d.net]
ExcelVBAは型に対する考慮が緩いから正直期待にそえる回答はないと思うよ
例えば変数名の先頭に型を付与するようなルール決めてもタイプミスって言葉で許されるなら破綻するだけだしね

939 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 14:52:16.71 ID:bIyafktir.net]
>>923
だから、最後までちゃんとかけや
それはinputBoxを格納する変数の話だろ
そんな話はしてないわ
色々な具体例があって様々な解決策があるのに、なんにも具体的な話を出さずに抽象的に話しして、一部に対してだけ反論してお前は馬鹿か?

940 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 14:56:29.20 ID:jr7Apji9H.net]
>>924
ですよね
ありがとうございました

>>925
質問を理解できないアホw



941 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 14:58:44.32 ID:bIyafktir.net]
つーか
「単純にコードのミスを検出したいだけなんです
変数名を間違えた場合の保険程度のつもりなんです」
本当にこれだけだったら先頭にOption Explicitつけて似たような変数宣言するな、で終わる話だよな
さすがにOption Explicitをつけてない人はいないだろうからそんな超初歩的な事はありえないと思ってるけど

942 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 15:12:07.01 ID:bIyafktir.net]
>>926
え、>>924で解決したのか?
ってことはマジでOption Explicitをつけてなかっただけ?
そこまで超ド初心者だとは思わんかったわ

943 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 15:26:02.63 ID:PKxWUOv2d.net]
例の零細企業の馬鹿社員だろ

944 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 15:51:08.82 ID:jr7Apji9H.net]
>>928
結局回答できない無能で草

945 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 15:55:50.96 ID:41WP6aJtd.net]
やっぱり
こういうのを相手にするのがそもそもの間違い

946 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 16:26:35.24 ID:QQqpl7Qdr.net]
>>929
ん?呼んだ?

947 名前:デフォルトの名無しさん [2023/01/26(木) 16:54:33.47 ID:N0DN9EFmd.net]
IF Not Isnumeric( a + b ) then c = a + b
とか
c = a & b
とかの雑魚コードでも教えておけばよかったのに

948 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 17:03:23.50 ID:UDgAljjqM.net]
a = 1 の暗黙の型変換でエラーにしたいならそう言えよ

949 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 18:24:03.88 ID:JQ22Y2sI0.net]
>>928
なれると初心者の質問だって見抜けるようになるよ

950 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 18:44:31.80 ID:jr7Apji9H.net]
荒れすぎだろ
どうなってんだよ



951 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 19:02:58.68 ID:UvNszdC2d.net]
質問

952 名前:ェ雑だと回答する側は色々考えるからこういう感じになるんだよ
だから質問する側もちゃんと回答しやすいようにすればいいだけ
[]
[ここ壊れてます]

953 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 19:07:48.41 ID:lq03KzKz0.net]
そんなの期待するだけ無駄
そっとスレを閉じればいいのよ

954 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 19:12:37.90 ID:CIVBTG9eM.net]
零細企業のアホみたいな奴に答えてやろうなんて思うから荒れる
助けてで始まる質問する奴や、頭が悪いのに自分はできるみたいに思っておかしな質問をする奴は無視するのが一番

955 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 19:15:21.07 ID:LFv4Wa39r.net]
てゆーかそんな事を言うやつがわざわざこんなとこ見るなよ
教えてやってるみたいな立ち位置でさw

956 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 19:17:05.41 ID:fSHWBRl+H.net]
変数が文字列ならエラーにすれば?

957 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 19:26:25.23 ID:im4j/4Ys0.net]
そもそも
> Str a
> Str b
> Str c
の時点で実際に動かしてないんだから相手する価値なし

958 名前:デフォルトの名無しさん mailto:sage [2023/01/26(木) 20:00:51.10 ID:BIrRkdsHd.net]
相手にしたくないならほっておけばいいんだから無駄なレス書いて荒らすなよ

>>926
サンプル書けばわかると思うけど例えば下のようなコードは最後の数値型に数値以外の代入のみエラーとなるからコーディングミスしないように注意するしかないという話
Dim a As String
Dim b As Long
a = "a" '文字の"a"
a = 1 '文字の"1"
b = "1" '数字の1
b = "a" '変換エラー

>>928
そういう話じゃないと思うぞ

959 名前:デフォルトの名無しさん [2023/01/26(木) 20:10:49.10 ID:omfXV+oL0.net]
キチンとString型を宣言しているなら確か
+は文字列連結の意味になるんじゃなかったっけ?
であれば前のレスで言ってた人がいたけど
- 0とか*0とかすればエラーになるんじゃないかな?

逆にSQLとかで文字列を数値で扱いたい場合は
*0とか-0とかにすると暗黙の変換で数値にしてくれる。

VBAでは型宣言は絶対だけど、
VBSみたいにスカラー変数を使う場合は
VBAみたいな型指定の型宣言が出来ないんで少し戸惑うかもね。

でもここはVBAのスレなので、
基本的に型宣言は絶対だと思っていいと思うよ。

960 名前:デフォルトの名無しさん mailto:sage [2023/01/27(金) 00:45:46.26 ID:PwZKt+DmH.net]
>>944
>+は文字列連結の意味になるんじゃなかったっけ?
ならないよ



961 名前:デフォルトの名無しさん mailto:sage [2023/01/27(金) 00:52:57.14 ID:Gy/KHy720.net]
>>945
https://i.imgur.com/v220L7Z.png

962 名前:デフォルトの名無しさん mailto:sage [2023/01/27(金) 01:00:12.13 ID:PwZKt+DmH.net]
>>946
!?
https://i.imgur.com/NYHsRgw.png

どうなってんだ?






[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧](;´∀`)<313KB

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