Excel VBA 質問スレ Part58

そのデータがワークシート上にあるんなら、オートフィルターかければ？
VBAで1行で書けるぞ

113

： デフォルトの名無しさん [sage] 2018/12/11(火) 09:27:01.56

:zUaOIyWC

> データの塊の上下の行番号を調べる
それ一行一行調べないとわからないんじゃね？

普通に一気に配列に読み込んで空白行を詰める処理を入れればいいかと

フィルタ掛けた結果を一気に配列に読み込むってできたっけ？

114

： デフォルトの名無しさん [sage] 2018/12/11(火) 11:43:07.63

:U/EFAptV

>>109

fjだかのExcel会議室では配列がホットな話題になったよ
t.Tanaka氏とかもコテハンで議論に参加してさ
なつかしいなあ

115

： デフォルトの名無しさん [sage] 2018/12/11(火) 11:50:12.79

:s7r8QuRW

>>114

お
っ
さ
ん

116

： デフォルトの名無しさん [sage] 2018/12/11(火) 12:15:58.68

:/u4ZG0F2

>>115

当時からおっさんだったら、今頃じーさんかも知れないぞ。

117

： デフォルトの名無しさん [sage] 2018/12/11(火) 14:13:54.04

:mN+cBX2v

下からCtrl↑で止まったセルの行番号を取得するを繰り返せば毎行調べなくて済む

オートフィルターで絞った結果を可視セルだけ選択しても、取り込まれるのは左上だけになるから無理だね
一行一行調べる羽目になる
やるなら作業シート作ってコピペしてから取り込むんだけだ、それはやりたくない訳で

118

： デフォルトの名無しさん [sage] 2018/12/11(火) 14:39:45.96

:zUaOIyWC

> 下からCtrl↑で止まったセルの行番号を取得するを繰り返せば毎行調べなくて済む
それはそうだけど速いかどうかは状況次第だね

> VBAで1行で書けるぞ
って方法があるみたいなことを書いてるので聞いただけ

119

： デフォルトの名無しさん [sage] 2018/12/11(火) 20:47:54.18

:r2my7w49

元々、どういう考えで

が言ったのかは分からんけど、配列に取り込むまでを1行って言ってたのかなあ。
オートフィルタをかけるコードが1行という意味じゃないかな。

だからといって、そこからどうするんだ?とは思うけどさ。

120

： デフォルトの名無しさん [sage] 2018/12/11(火) 21:00:32.57

:zUaOIyWC

>>119

元々は

> 空白行が複数ある範囲から、空白行を除いて配列に取り込むのはどうやるのが効率がいい？
なので、フィルターだけの事を言われても…

121

： デフォルトの名無しさん [sage] 2018/12/11(火) 21:34:59.21

:OAAPkOpt

クリップボード経由でデータを一気に取得、オートフィルタにも対応
※最小設定FM20.DLLが必要
Sub Macro1()
　　ActiveSheet.Range("A1:C10").Copy
　　With New MSForms.DataObject
　　　　.GetFromClipboard
　　　　str = .GetText
　　End With
　　MsgBox str
End Sub

122

： デフォルトの名無しさん [sage] 2018/12/11(火) 21:35:27.33

:OAAPkOpt

参照設定

123

： デフォルトの名無しさん [sage] 2018/12/11(火) 21:40:19.21

:r2my7w49

>>120

そりゃそうだけど、

を読む限り1行ってのはオートフィルタだけについて言ってるように受け取る方が自然じゃん。
だから、そこからどうするんだという感想になるわけ。
そもそも

は配列に取り込むことなんて想定してないかもしれない。
空白があって見にくいのを何とかしたいんだろうとか、勝手に先読みして配列に取り込むという元のお題をほったらかしとか。

そもそも300行程度のデータならどんな方法でも良いんじゃないかと思う。
そんなんで思い悩むのは無駄だよ。

124

： デフォルトの名無しさん [sage] 2018/12/11(火) 21:51:43.64

:zUaOIyWC

>>123

ガイジなのかな？

125

： デフォルトの名無しさん [sage] 2018/12/11(火) 22:40:05.46

:r2my7w49

>>124

君が?
それとも

126

： デフォルトの名無しさん [sage] 2018/12/11(火) 22:53:52.01

:8DZhL+mg

それこそVariant型配列にでもぶっ込めば手っ取り早いし処理もそれなりに速そう

127

： デフォルトの名無しさん [sage] 2018/12/11(火) 23:25:52.21

:mBAHWwo2

UI Automationのレイトバインドって、どうやればいいんでしょう?
レジストリ調べてもクラスID出てこないし・・。

128

： デフォルトの名無しさん [sage] 2018/12/11(火) 23:34:38.12

:r2my7w49

>>127

基本的に出来ない。

129

： デフォルトの名無しさん [sage] 2018/12/12(水) 00:19:46.28

:3KU1fzXl

>>128

参照設定は出来るのに、CreateObjectは不可なんてのがあるんですか?

130

： デフォルトの名無しさん [sage] 2018/12/12(水) 06:08:42.05

:yHW8d60g

>>125

自覚がないのは可哀想

131

： デフォルトの名無しさん [sage] 2018/12/12(水) 09:43:38.09

:F+70e5KM

>>129

ある。

132

： デフォルトの名無しさん [sage] 2018/12/12(水) 09:44:36.67

:F+70e5KM

>>130

まず、日本語の勉強をしような。

133

： デフォルトの名無しさん [sage] 2018/12/12(水) 12:29:40.76

:4PEjGm8G

>>132

どこから日本語とか出てくるんだろう？
日本語ができないという自覚はあるってことなのか？ w

134

： デフォルトの名無しさん [sage] 2018/12/12(水) 19:01:00.09

:pifCGzoS

グラフ作成マクロ作ったんだけど結構面倒くさくない？慣れの問題？
特に細かなフォーマットとか云々がめんどい
それに出力シートのセルいじられて（1行目削除）出力セルがズレたせいでフォーマット崩れたとか言われて頭痛いんだけどどう対処するのが良いのこれ

135

： デフォルトの名無しさん [] 2018/12/12(水) 20:01:12.49

:K6Ng+wlm

使用方法まとめたドキュメント作ってないなら作成者が悪い。
作ってるなら碌に読まないで文句いってる使用者が悪い。
作り方次第で解決するとは思うが。

136

： デフォルトの名無しさん [sage] 2018/12/12(水) 20:02:06.59

:aZC5ZPlw

ルーチンにはルールが必要やで

137

： デフォルトの名無しさん [sage] 2018/12/12(水) 22:32:28.50

:3KU1fzXl

>>134

逃げる。
いや、マジで。
フォーマットを壊す人ような人の依頼を受けると碌なことない。
どうしてもやらなきゃダメなら、
ちょっとでも崩れたら、エラーメッセージが出るようにする。
あなた壊しましたね。直さないと出力できませんよ的な。

138

： デフォルトの名無しさん [sage] 2018/12/12(水) 23:25:41.76

:YxATkhEB

シートとブックを保護する

139

： デフォルトの名無しさん [sage] 2018/12/13(木) 09:08:24.41

:UfF+3F/y

出来たグラフをPDFにしてそれを渡す

140

： デフォルトの名無しさん [sage] 2018/12/13(木) 09:12:33.11

:LhgdcJ19

>>133

人の話が理解出来てないから、日本語という言葉が出て来るんじゃないの。

141

： デフォルトの名無しさん [sage] 2018/12/13(木) 12:28:02.78

:yiVhwKQv

>>140

> 人の話が理解出来てないから
既にガイジかよって指摘されてるだろ w

そもそも配列に取り込むという要件明記されてるのにオートフィルターなら１行で書けるとか頓珍漢にも程がある

142

： デフォルトの名無しさん [sage] 2018/12/13(木) 21:18:33.38

:WIhtQMzU

>>138

シーブックがなんだって？

143

： デフォルトの名無しさん [sage] 2018/12/13(木) 22:36:46.58

:X2R1LlWK

CreateObject("Excel.Application").ExecuteExcel4Macro("CALL(DLL, 名前, ""JJ"", variant型の配列)")

これにvariant型の配列を渡す場合はどうすればいい?
OとかKとか入れてもダメなんですけど。
普通に呼べとか言わないで。

144

： デフォルトの名無しさん [sage] 2018/12/14(金) 01:30:05.29

:dZAIZmaz

>>142

あのぉ…

145

： デフォルトの名無しさん [sage] 2018/12/14(金) 07:22:07.04

:CUJ1nMvt

>>143

不可能
1セルずつしか処理できないのが特徴だし

146

： デフォルトの名無しさん [sage] 2018/12/14(金) 09:13:11.97

:GTuXeJsU

>>141

想像した通りだ。
日本語勉強しような。

俺は

ではないという基本的なことも無視かね?

には全く賛同出来ないが、かといって

は君の要件に対して1行で書けると言っているとは限らないと読み取れると言っている。

1行で書けるというのは、その直前のオートフィルタをかけるという部分を受けてのものとも読み取れるのが日本語の解釈だ。
もちろん、君の要件に対してのものというのを全面的に否定するものでもない。
どっちにも受け取れるのが日本語の曖昧さだ。

147

： デフォルトの名無しさん [sage] 2018/12/14(金) 12:34:42.08

:8Omm9ucp

>>146

には全く賛同出来ないが、かといって

は君の要件に対して1行で書けると言っているとは限らないと読み取れると言っている。
別に俺が出した要件じゃねーけどな
敵は１人に見える病気かな？ w
フィルター云々はいいとして要件にそぐわない事書いて意味あるんか？
って話な
フィルター掛けときゃすげー楽になると言うならまだしも

とか恥の上塗りにしかなってないだろ
ここまで説明しないとダメなの？

148

： デフォルトの名無しさん [sage] 2018/12/14(金) 19:29:44.65

:GTuXeJsU

>>147

>別に俺が出した要件じゃねーけどな
全く、馬鹿らしいがそんなことは想定済みだ。
こういう場合、要件出したのが君だろうが違かろうが「君の要件」と書いておけば通じるという想定だ。
それまでの君の発言を見て要件出した奴かどうかなんて調べるのがめんどうということだ。

>フィルター云々はいいとして要件にそぐわない事書いて意味あるんか？
って話な
そんなことは要件出した奴が判断することだし、俺はそんな所にレスしたわけじゃない。
単純に1行が要件そのものに対してとは限らんと言ってる。
それに「VBAで1行で書けるぞ」が要件のことを言っていなくてもトータルで要件にそぐうこともあり得る。
フィルタのコードに1行、他に何十行かで要件を満たしているかもしれないわけだ。

>フィルター掛けときゃすげー楽になると言うならまだしも

とか恥の上塗りにしかなってないだろ

とは限らん、というか違うと思うわけだが、イコールとは限らない以上、

の意図が「フィルター掛けときゃすげー楽になる」という可能性を排除できない。
つまり、君の言う「まだしも」の可能性が残っている。
それに、俺が書いたように

が要件にそぐわないものを出した可能性もある。
したがって、「1行で書ける」というのが要件そのものに対してではなくフィルタをがける処理のみに対してである可能性は十分ある。
これは日本語でのやり取りなら十分あり得ることだ。

149

： デフォルトの名無しさん [sage] 2018/12/14(金) 19:35:29.16

:GTuXeJsU

>>146

>ここまで説明しないとダメなの？

ちなみに、君のその説明、一番最初から分かってるから。
その君の主張が甘いんじゃねということを言ってるのが最初からの俺の主張だぞ。

150

： デフォルトの名無しさん [sage] 2018/12/14(金) 19:36:43.15

:GTuXeJsU

アンカー間違えた。

は

へのレスな。

： デフォルトの名無しさん [sage] 2018/12/14(金) 20:29:48.28

:8Omm9ucp

>>148

> つまり、君の言う「まだしも」の可能性が残っている。
なら早く出せよ w
出せない時点で中身のない長文乙
にしかならんよ

152

： デフォルトの名無しさん [sage] 2018/12/14(金) 21:50:27.31

:GTuXeJsU

>>151

???
出すのは

であって俺では無いし、それにこの議論が始まるまでの話だから今さら出す、出さない関係無く

のの時点で1行が要件に対してと決めつけたのは間違いなんだが。

153

： デフォルトの名無しさん [sage] 2018/12/14(金) 22:24:25.69

:OczD5cRe

>>145

セルじゃなくてvariant型の配列。

154

： デフォルトの名無しさん [sage] 2018/12/14(金) 22:48:04.67

:yDEitqc6

>>152

お前に出せないのはわかってるよ w
出せないのに
> つまり、君の言う「まだしも」の可能性が残っている。
とかアホでしょ？
って話な

そもそも

どころか

の時点で
> フィルタ掛けた結果を一気に配列に読み込むってできたっけ？
で

がおかしいことを指摘してる

155

： デフォルトの名無しさん [sage] 2018/12/14(金) 23:06:35.41

:GTuXeJsU

>>154

???
まだ分かって無いのか?

の意図がまだ分かっていない時点では

が正しい可能性が残っていると言っている。
残っている以上、

をおかしいと決めつけたお前がおかしいということだ。

出す必要なんて最初からないんだよ。

156

： デフォルトの名無しさん [sage] 2018/12/14(金) 23:13:37.60

:GTuXeJsU

>>154

>そもそも

どころか

の時点で
> フィルタ掛けた結果を一気に配列に読み込むってできたっけ？
で

がおかしいことを指摘してる

がフィルタをかけることだけについて1行と言っているのなら―気に読み込まなくても

は正しい可能性が残る。

つまり、お前の指摘は間違っていることになる。

がおかしいというのなら正しい可能性が残らないように指摘しなければならない。

157

： デフォルトの名無しさん [sage] 2018/12/14(金) 23:48:38.10

:yDEitqc6

>>155-156

で？
役に立たない長文書いてもなんの解決にもならんよ
恥の上塗り重ねてるだけ w

158

： デフォルトの名無しさん [sage] 2018/12/15(土) 03:21:06.31

:WK8Eb1ay

>>157

なんだ、反論できんのか?
だったら何も言うことは無い。

まともに日本語が理解出来ないのは哀れだねえ。

159

： デフォルトの名無しさん [sage] 2018/12/15(土) 07:16:14.22

:lJT07BrA

>>155

が正しい可能性が残っていると言っている。
バカなの？

の内容が間違ってるとか言う話じゃなくて「頓珍漢」だと言ってるの
まあ

はさらに頓珍漢だけどな

> まともに日本語が理解出来ないのは哀れだねえ。
ブーメラン過ぎる w

160

： デフォルトの名無しさん [sage] 2018/12/15(土) 08:17:58.44

:B6remLfl

いつになったら場違いだと気付くのだろうか。。。

161

： デフォルトの名無しさん [sage] 2018/12/15(土) 09:04:38.64

:U64Nbokg

でさ、ここ質問スレ

乱闘なら他でやれ、クズ共

162

： デフォルトの名無しさん [sage] 2018/12/15(土) 10:21:31.76

:WK8Eb1ay

>>159

アホ。
頓珍漢ではない可能性が残っている。
お前が勝手に決めつけているだけだ。

163

： デフォルトの名無しさん [sage] 2018/12/15(土) 10:31:11.19

:WK8Eb1ay

だいたい、俺の意見はお前と近いんだよ。
お前みたいな甘さが無いだけで。
だから「そこからどうするんだ」という発言が出てる。
頓珍漢だろうとは思ってるの。
確定してないから決めつけてないだけで。

だいいち、頓珍漢だとしてもお前の決めつけが間違ってるのは変わらないだろう。
頓珍漢だなんてのは反論になってないな。
だから日本語を勉強しようなという話になる。

164

： デフォルトの名無しさん [sage] 2018/12/15(土) 10:57:25.02

:0SCAvoVT

>>162-163

頓珍漢の根拠まで書いてあるのに何を言ってるんだこのアホは w

>> 空白行が複数ある範囲から、空白行を除いて配列に取り込むのはどうやるのが効率がいい？
> なので、フィルターだけの事を言われても…

165

： デフォルトの名無しさん [] 2018/12/15(土) 12:42:24.61

:lWJaBIbu

いつまでネコパンチ打ち合うつもりやねんおまえら

166

： デフォルトの名無しさん [sage] 2018/12/15(土) 14:45:59.06

:945ViHWv

次の質問が来ないからじゃね

167

： デフォルトの名無しさん [sage] 2018/12/15(土) 15:45:43.01

:n3n4s8WM

>>166

じゃ、ひとつ

Excel VBAで、Google OAuth認証などをやってるが、Clien_IDやSecretはコード中に書くとしても、取得したAuth CodeやAccess_Token、Refresh_Tokenなどはどこに安全に格納出来るか？

.NETアプリやAccessのようにappconfigや仕舞えるテーブルが無いので、皆どうしているのかね？

168

： デフォルトの名無しさん [sage] 2018/12/15(土) 15:53:11.37

:mgmsvi+C

>>167

そんなものをVBAで作らない
もしどうしても必要があるなら外部のコンソールアプリを呼び出す形にする

169

： デフォルトの名無しさん [sage] 2018/12/15(土) 16:03:58.72

:VvS+qBfB

VBAで何をやろうとしてるんだよ
何のためにそんな実装するのか詳しく

170

： デフォルトの名無しさん [sage] 2018/12/15(土) 16:17:18.77

:U8VjJ+lV

app.configとかテーブルとかが安全だと思ってるなら、
セルに書いといて保存でもテキストファイル書き出しでも好きにすればいいんじゃね

171

： デフォルトの名無しさん [sage] 2018/12/15(土) 16:44:01.14

:2qRdp2bE

>>167

> appconfigや仕舞えるテーブル
そんなのでいいなら適当なファイルとかブックのドキュメントプロパティに入れときゃいいんじゃね？

172

： デフォルトの名無しさん [sage] 2018/12/15(土) 16:57:49.47

:WK8Eb1ay

>>164

バーカ

の書き方ではフィルタだけとは限らない。

だけで終わりとは限らない書き方だろうが。
あの書き方では、その後に何かあるか、それとも後は察しろという風にも読み取れる。
だから俺は「そこからどうするんだ」という発言になる。
たぶん頓珍漢だろうけど、そこからどうするか聞いてからじゃないと確定出来ないからだ。

それに頓珍漢で逃げたいかもしれんが、頓珍漢かどうかは反論にならない。
頓珍漢だとしても1行が要件全体にかかってると決めつけたお前の解釈が甘いことには変わりが無い。

173

： デフォルトの名無しさん [sage] 2018/12/15(土) 18:04:57.01

:lJT07BrA

お前がどう思うかなんてどうでもいい

は

の要件を満たしてない頓珍漢なレスであることに変わりない
まあ、続きのつもりかどうかは知らんが

みたいな斜め上のレスをするアホもいるけどな w

174

： デフォルトの名無しさん [sage] 2018/12/15(土) 18:13:07.03

:zDjD9XpS

>>168-171

結局、お前らがここで、くだらない議論してる間抜けを招いてる元凶ってにはよくわかったよ。

まともな回答もできん、技術力ないアホってのもなｗｗｗ

175

： デフォルトの名無しさん [sage] 2018/12/15(土) 18:28:50.08

:lJT07BrA

> 元凶ってにはよくわかったよ。
煽ろうとしてカミカミとか恥ずかしすぎるww

176

： デフォルトの名無しさん [sage] 2018/12/15(土) 18:33:30.22

:WK8Eb1ay

>>173

つまりお前の日本語解釈能力の低いことが確定ということだ。

甘いねえ。

は

の後だ。
お前の指摘の後でもある。

の存在はお前の頓珍漢だという決めつけを補強しない。
なぜなら

より以前にお前は決めつけをしてるんだからな。

因みに俺は

じゃないんで別に

が頓珍漢でも全くかまわん。

177

： デフォルトの名無しさん [sage] 2018/12/15(土) 18:45:26.64

:lJT07BrA

>>176

> つまりお前の日本語解釈能力の低いことが確定ということだ。
根拠のない勝利宣言 w
低能にありがちな行動

178

： デフォルトの名無しさん [sage] 2018/12/15(土) 20:16:24.25

:VvS+qBfB

なんだこいつ病気か

179

： デフォルトの名無しさん [] 2018/12/15(土) 20:42:55.07

:NkuNHsZU

病気の人に失礼だろそれは

180

： デフォルトの名無しさん [sage] 2018/12/15(土) 22:10:19.68

:WK8Eb1ay

>>177

根拠?
既に何度も示してお前が反論出来なくなっているわけだが。

は要件全てではなくオートフィルタのみについて1行と言っていた可能性がある時点でお前の決めつけは間違っている。

頓珍漢かどうかは関係ない。

が頓珍漢でもお前は間違ってる。

181

： デフォルトの名無しさん [sage] 2018/12/15(土) 22:12:08.06

:WK8Eb1ay

何故、お前が間違った決めつけをしたのか?
それはおまえの日本語解釈能力が低いからだ。

182

： デフォルトの名無しさん [sage] 2018/12/15(土) 22:33:13.95

:7RBFgqMT

お客さんが多いなあ

183

： デフォルトの名無しさん [sage] 2018/12/15(土) 23:20:05.72

:lJT07BrA

>>180-181

は要件全てではなくオートフィルタのみについて1行と言っていた
それが頓珍漢だって言ってるのに w
続きがあるかもしれないから頓珍漢じゃない可能性があるとかバカかよ
そんなこと言い出したらなんとでも言えるわ

184

： デフォルトの名無しさん [sage] 2018/12/16(日) 07:19:47.75

:48kCZeZq

単なる罵り合いを見せつけられるくらいなら過疎ってるほうがよっぽど良い

185

： デフォルトの名無しさん [sage] 2018/12/16(日) 15:01:54.86

:wWzCJETE

>>183

バカ?
頓珍漢でもお前の間違いは変わらんと言ってる。
反論出来ないからといって見当違いばかりだな。

186

： デフォルトの名無しさん [] 2018/12/16(日) 15:15:50.29

:Waa1ZwFh

この罵り合いって一人で自演やってるの？
それとも馬鹿が2人もいるの？

187

： デフォルトの名無しさん [sage] 2018/12/16(日) 15:21:47.19

:7UXd2BE0

もう言ってることが無茶苦茶
> 反論出来ないからといって見当違いばかりだな。
またブーメランかよ w

188

： デフォルトの名無しさん [sage] 2018/12/16(日) 15:31:07.45

:wWzCJETE

>>187

頓珍漢でもお前は間違ってるのは認めるのかい?

189

： デフォルトの名無しさん [sage] 2018/12/16(日) 15:34:57.02

:wWzCJETE

>>187

はオートフィルタのみについて1行と言った可能性があるのに要件全てに対してだと決めつけたのは間違いであり、

が頓珍漢かどうかに関係なく

の発言は思慮が浅いと思うんだが、それについては反論出来ないということでOK?

190

： デフォルトの名無しさん [sage] 2018/12/16(日) 15:38:49.65

:wWzCJETE

見当違いなのは、頓珍漢かどうかに関係なく間違いだと言ってるのに、いつまでたっても頓珍漢で押し通そうとしてるからなんだが。

191

： デフォルトの名無しさん [sage] 2018/12/16(日) 15:47:14.35

:7UXd2BE0

>>188-189

もしかして
> そんなこと言い出したらなんとでも言えるわ
っていう意味すら理解できないガイジ？ w

192

： デフォルトの名無しさん [sage] 2018/12/16(日) 16:18:10.73

:wWzCJETE

>>191

そんなことは無い。
日本語には2通りの解釈が出来る場合があって、

は明確にその場合だ。
どんな場合でも複数の解釈が出来るとは限らんし、普通に複数の解釈が出来る場合に決めつけをすることは無い。

で、お前は間違えを認めるのか?

193

： デフォルトの名無しさん [sage] 2018/12/16(日) 16:23:40.16

:7UXd2BE0

>>192

２通りの解釈？
後付していいなら２通りどころかなんとでも解釈できるように書けるぞ

> そのデータがワークシート上にあるんなら、オートフィルターかければ？
> VBAで1行で書けるぞ
でも、〇〇した方がもっといいけどな

ってか？ w

194

： デフォルトの名無しさん [sage] 2018/12/16(日) 18:04:23.80

:wWzCJETE

>>193

???
本当に日本語ダメなんだな。
後付けなんてしてない。

のみで2通りに解釈できるんだが。
それを理解出来ずに見当違いの言い訳するから「日本語勉強しような」と言われるんだ。

195

： デフォルトの名無しさん [sage] 2018/12/16(日) 18:20:18.12

:7UXd2BE0

>>194

お前が誰か知らんけど
>

だけで終わりとは限らない書き方だろうが。
とか書いてたアホがいたっけな w

196

： デフォルトの名無しさん [sage] 2018/12/16(日) 18:55:56.11

:wWzCJETE

>>195

また、見当違いか。

だけで2通りの解釈ができ、それをお前が理解出来なかったのは認めるのかい?

197

： デフォルトの名無しさん [sage] 2018/12/16(日) 19:12:31.97

:7UXd2BE0

>>196

だけで終わりとは限らない書き方だろうが。
とか書いてたアホとは他人なの？
なら黙っててね
それとも恥ずかしくてごまかそうと必死なのかな？ ww

198

： デフォルトの名無しさん [sage] 2018/12/16(日) 19:15:43.10

:wWzCJETE

>>197

まず、お前が間違ってたのを認めるかどうかが先だ。
お前の間違いは1つだけでは無いので話を変えて逃げようとしても無駄だ。

後付け云々についてはその後だ。

199

： デフォルトの名無しさん [sage] 2018/12/16(日) 19:18:42.74

:wWzCJETE

悔しいのは分からんでも無いが、客観的に見て自分に間違いがあるなら認めような。
間違いが無いなら別の話に持ってこうとせずに真正面から反論すべきだな。

200

： デフォルトの名無しさん [sage] 2018/12/16(日) 19:29:40.20

:7UXd2BE0

>>198-199

ごまかそうと必死すぎて笑える
まずは
>

だけで終わりとは限らない書き方だろうが。
> とか書いてたアホとは他人なの？
に、答えなよ

201

： デフォルトの名無しさん [sage] 2018/12/16(日) 20:08:06.24

:iM0z/gpL

>>200

誤魔化そうとしてるのはお前。
一番最初の話は

の解釈をお前が間違ったのかどうかだろ。

>>119

の時点の話だ。

202

： デフォルトの名無しさん [sage] 2018/12/16(日) 22:36:05.00

:7UXd2BE0

お前がどう言おうと

単体では

の要件を満たさない頓珍漢なレスである事実は変わらんよ
残念だったな w

203

： デフォルトの名無しさん [sage] 2018/12/16(日) 23:06:44.08

:jPkme8um

>>202

バー力。
頓珍漢でもお前は間違ってると言ってるだろ。
つまりお前はまだ何一つ反論をしていない。
お前が間違っているという俺の指摘に何ーつ反論していない。

このまま間違いを認めるのかねw

204

： デフォルトの名無しさん [sage] 2018/12/16(日) 23:17:12.24

:7UXd2BE0

>>203

> 頓珍漢でもお前は間違ってると言ってるだろ。
お前は何を言ってるんだよ、

が頓珍漢なら俺が正しいことになるんだが…
マジでバカすぎる w

205

： デフォルトの名無しさん [sage] 2018/12/17(月) 03:10:52.43

:Lv/9aVPQ

>>204

ならないんだが。
何度も言ってるのに無視かよ。
よっぽど頭が悪いんだな。

はオートフィルタのみについて1行と言っている可能性がある以上、配列に読み込む部分を含めて1行と決めつけて解釈したお前は間違い。
それは頓珍漢なこととは別の問題だ。

206

： デフォルトの名無しさん [sage] 2018/12/17(月) 03:13:56.86

:Lv/9aVPQ

物事をきちんと分けて考えられないのもこのバカの特徴だな。

207

： デフォルトの名無しさん [sage] 2018/12/17(月) 07:18:53.33

:QtVZQcqx

>>205-206

はオートフィルタのみについて1行と言っている可能性がある
だからそれが頓珍漢だって言ってるのに…
人の話を無視して論破されてる話を何度も繰り返すのは低能にありがちな行動だけどな w

> 物事をきちんと分けて考えられないのもこのバカの特徴だな。
ブーメラン乙

208

： デフォルトの名無しさん [sage] 2018/12/17(月) 07:34:27.78

:KD4HX3We

まだやってんのw

209

： デフォルトの名無しさん [sage] 2018/12/17(月) 07:54:15.41

:QtVZQcqx

2018/12/17(月) 03:10:52.43 ID:Lv/9aVPQ
夜中の3時とかよほど悔しかったみたいよ w

210

： デフォルトの名無しさん [sage] 2018/12/17(月) 09:21:28.94

:Lv/9aVPQ

頓珍漢でもお前は間違ってるんだよ。
全く反論になってないと言ってるだろうに。

が頓珍漢では無い場合
→お前は間違ってる

が頓珍漢な場合
→お前は間違ってる

お前の発言「だから

は頓珍漢なんだよ」

つまり、お前は間違ってる

日本語ワカリマスカ?

211

： デフォルトの名無しさん [sage] 2018/12/17(月) 09:26:32.36

:Lv/9aVPQ

>>209

冷静に見ればよっぽど悔しく見えるのは両方だ。
劣勢だからって同意を求めようとするな。

212

： デフォルトの名無しさん [] 2018/12/17(月) 12:18:18.33

:5M+6Ly1a

どっちも劣勢なんやからいい加減諦めろやw

213

： デフォルトの名無しさん [sage] 2018/12/17(月) 12:22:59.36

:QtVZQcqx

>>210

が頓珍漢な場合
> →お前は間違ってる
一体どういう思考回路なんだろ？
ガイジを装ってウヤムヤにしようと思ってるのかな？
そんなことしなくても既にガイジ並の思考能力しかないことはバレてますよ w

>>211

ごめんな、流石に俺は夜中の３時にレスするほど悔しくはないんだよ… w

214

： デフォルトの名無しさん [sage] 2018/12/17(月) 12:32:00.75

:Lv/9aVPQ

>>207

俺が物事をきちんと分けて考えられないというなら、何を分けて考えられなかったかを示す必要がある。
俺はお前が何を分けて考えられていなかったか示してるぞ。

適当にブ―メランなどと言っても根拠0じゃ何の説得力も無い。

215

： デフォルトの名無しさん [sage] 2018/12/17(月) 12:35:07.44

:Lv/9aVPQ

>>213

バーカ
頓珍漢だとしてもお前は2通りの解釈が出来なかっただろうが。

オートフィルタのみ1行(の可能性がある)なのにお前は要件全てだと勘違いして決めつけた。

216

： デフォルトの名無しさん [sage] 2018/12/17(月) 12:38:15.60

:Lv/9aVPQ

>>213

プッ。
この期に及んで悔しくないなどと言っても笑われるだけだぞ。
誰もそんな話信用しないわ。

217

： デフォルトの名無しさん [sage] 2018/12/17(月) 19:29:53.15

:QtVZQcqx

>>214-215

もうアホには何度言っても無駄なんだろうな w
２通りの解釈どころかその後に付け加えるなら何でもありあり
付け加えないなら

の要件を満たさない頓珍漢なレス
で、世間では普通は書いてもない事を付け加えて解釈なんてしない
（まあ一時話題になった忖度とかはあるけどな）
要するに

単体では頓珍漢なレスで確定なんだよ
オートフィルターが１行とか言われても、はあ？それがどうしたって話になるだけ

>>216

うんうん、君が夜中の３時にレスしてると言う「事実」があるだけだね w

218

： デフォルトの名無しさん [sage] 2018/12/17(月) 20:17:28.92

:Lv/9aVPQ

>>217

頓珍漢でもお前は間違ってると何度言っても、頓珍漢で押し通そうとするのが笑える。

単体で2通りの解釈が出来ると言っても後付けすればなどと見当違いなことを言う。

この期に及んでも何ーつ反論していないバカ。

219

： デフォルトの名無しさん [sage] 2018/12/17(月) 20:52:45.62

:QtVZQcqx

>>218

> 頓珍漢でもお前は間違ってる
根拠も示せずに何度もほざかれても困るし

>

単体で2通りの解釈が出来る
解釈書いてみ
まさかこの期に及んでオートフィルターガーとか言うのはやめれくれよ

> この期に及んでも何ーつ反論していないバカ。
またブーメランかよ…
好きだねー w

220

： デフォルトの名無しさん [sage] 2018/12/17(月) 21:32:44.47

:aWnNi0b/

まだいるのかよ…

221

： デフォルトの名無しさん [sage] 2018/12/17(月) 21:34:11.65

:Lv/9aVPQ

>>219

何度も書いてる。
1行はオ―トフィルタを掛けるコードが1行と解釈できる。

何度書いても理解出来ないバカ。
日本語に弱いから仕方ないのかねえ。

ハンバーグステーキを作ろうとしてる奴に「付け合わせのマッシュポテトはじゃかりこにお湯を注げば。
1分でできるぞ。」
と言った時、こいつの脳内ではハンバーグステーキが1分でできることになってしまうのだ。

222

： デフォルトの名無しさん [sage] 2018/12/17(月) 22:41:30.96

:yChZzMqc

>>221

> 1行はオ―トフィルタを掛けるコードが1行と解釈できる。
それがなんの意味もない頓珍漢なレスだ
って何度も書かれてるのに w

> 何度書いても理解出来ないバカ。
> 日本語に弱いから仕方ないのかねえ。
お前がな

> ハンバーグステーキを作ろうとしてる奴に「付け合わせのマッシュポテトはじゃかりこにお湯を注げば。
> 1分でできるぞ。」
> と言った時、こいつの脳内ではハンバーグステーキが1分でできることになってしまうのだ。
意味不明な例え乙
これぞ頓珍漢だな w

223

： デフォルトの名無しさん [sage] 2018/12/17(月) 23:23:37.71

:Lv/9aVPQ

バカは何度でもループする。

「頓珍漢でもお前は間違い。」に対しての反論が「頓珍漢だ」じゃ反論にならない。

救いようがない程のバカw

224

： デフォルトの名無しさん [sage] 2018/12/17(月) 23:25:29.19

:Lv/9aVPQ

>>222

そりゃ日本語が理解出来ないんだから意味不明だろうなw

225

： デフォルトの名無しさん [sage] 2018/12/17(月) 23:57:53.98

:yChZzMqc

>>223

> バカは何度でもループする。
自覚はあるんだ w

>> 頓珍漢でもお前は間違ってる
> 根拠も示せずに何度もほざかれても困るし
は、ガン無視だし
どう反論しろと…

226

： デフォルトの名無しさん [sage] 2018/12/17(月) 23:59:31.81

:yChZzMqc

ハンバーグ作ろうとしてる奴にドヤ顔でマッシュポテトの作り方語るバカがなにかほざいてるな w

227

： デフォルトの名無しさん [sage] 2018/12/18(火) 02:09:02.31

:0uF82Fsr

ハンバーーーーーーーグ！

228

： デフォルトの名無しさん [] 2018/12/18(火) 06:46:14.46

:mQMHvFDr

木枯しを吹き飛ばす熱い闘いが続いております
５ちゃんねら～の意地と意地とのぶつかりあい
書くのをやめたレスバトラーに待ちうけるのは「敗北」という恥辱にまみれた二文字のみ
「止められないレスがそこにある！」

それでは引き続きおたのしみ下さい

　バカ　vs　バカ

ﾌｧｲｯ!!!!!!!!

229

： デフォルトの名無しさん [sage] 2018/12/18(火) 08:11:45.42

:C3RGy1+P

>>225

2通りに解釈できるものをお前は理解出来なかったのが根拠と何度も書いているが。

とお前の両方が頓珍漢ということは普通にあり得る。
したがって

が頓珍漢だというお前の主張はお前が頓珍漢であることの反論にはならない。

230

： デフォルトの名無しさん [sage] 2018/12/18(火) 08:17:07.32

:C3RGy1+P

>>226

マッシュポテトはハンバーグの付け合わせだから元々作ることになっている。
ハンバーグの部分であるマッシュポテトの時短への言及であり、1分とはその部分にかかる時間である可能性がある。
全体にかかる時間ではないかもしれないと考えるのがまともな日本人だ。

お前は日本人じゃ無さそうだから理解出来んかもしれんが。

231

： デフォルトの名無しさん [sage] 2018/12/18(火) 08:34:19.90

:/UA4EEmu

ハンバーグの付け合せにマッシュポテトしか思いつかないとかどんだけ発想が貧しいんだよ w
知識も知能もスッカスカやん

232

： デフォルトの名無しさん [sage] 2018/12/18(火) 09:04:54.27

:C3RGy1+P

>>231

話をすり替えようとしても無駄だねえ。
単なる例に何言ってんの?

233

： デフォルトの名無しさん [sage] 2018/12/18(火) 10:39:29.20

:o0ORzhLh

二人のやりとりでここまで日を跨いで続くのってあまり見ない気がするけど、やっぱりム板住人気質ってことなんだろうな。
頭はあまり良くないのにその自覚が乏しく、細かいことに異常に拘る。自分も少なからずそういう傾向があるから、気をつけないとな……。

234

： デフォルトの名無しさん [sage] 2018/12/18(火) 11:37:31.53

:qVCHqInm

すごく昔っぽい

235

： デフォルトの名無しさん [sage] 2018/12/18(火) 12:16:58.67

:/UA4EEmu

頓珍漢な例を出してごめんなさい
だろ？ w

236

： デフォルトの名無しさん [sage] 2018/12/18(火) 19:13:23.83

:3O+U276/

今日も元気やな～。俺は風引いて寝込んでるからそのパワーが羨ましいよ w

237

： デフォルトの名無しさん [sage] 2018/12/18(火) 20:17:01.94

:C3RGy1+P

>>235

また新たに日本語を理解出来ない事象が発生かよ。

発想が貧しいなどと今までの話とは関係ない方向へ持ってこうとしたことに対して単なる例と言ったのであって、例としては全くもって的確だ。

238

： デフォルトの名無しさん [] 2018/12/18(火) 20:17:38.62

:mQMHvFDr

バカ共もさすがに恥を知ったんかなw

239

： デフォルトの名無しさん [] 2018/12/18(火) 20:18:08.69

:mQMHvFDr

と思たらまだ続いとったwナイスバカw

240

： デフォルトの名無しさん [sage] 2018/12/18(火) 22:18:11.50

:ncFc1flt

>>237

まだやるの？
> 決めつけたのは間違いなんだが。
とか言う奴が
> マッシュポテトはハンバーグの付け合わせだから元々作ることになっている。
とかどの口で言ってるんだよ w

配列への格納とオートフィルターが常に関係するわけじゃないのと同じでハンバーグとマッシュポテトは常に関係するわけじゃない
それぐらいは理解できるよね？

なお反論したいなら
> マッシュポテトはハンバーグの付け合わせだから元々作ることになっている。
が正しいと言う根拠持ってきてからにしてくれ

241

： デフォルトの名無しさん [sage] 2018/12/18(火) 23:27:31.75

:fQRWG6oh

> まだやるの？
たぶんこのスレ皆が君ら2人に対して同じことを思ってるよ。
これだけ思う存分、頭の悪さを見せ付けることができたんだからもう満足だろ？まだ足りないの？

242

： デフォルトの名無しさん [sage] 2018/12/18(火) 23:49:22.42

:ncFc1flt

なぜ同じレベルに落ちてまで参入するかな

243

： デフォルトの名無しさん [sage] 2018/12/19(水) 00:29:39.75

:L6rD7CwA

しかもオートフィルタとか

244

： デフォルトの名無しさん [] 2018/12/19(水) 01:44:12.73

:sYwMlaDi

すみません、先輩方教えて下さいIF 文がうまくいかず困っています。

For分のループの中で
　IF文の条件が一致したら　処理A、処理B、と20個くらい連続で複数実行したいのですが。

条件が一致しなくても処理Bからが動いてしまいます。

どのように記述すればよいのでしょうか。
EXCELの勉強サイトで質問をしても、条件１個くらいしか実施しないものしかなく困っております。

245

： デフォルトの名無しさん [sage] 2018/12/19(水) 02:24:14.86

:38k2t73z

For ...
　If 条件 Then
　　処理A
　　処理B
　　...
　End If
Next
ってことか？

Select Case かElseIf使えって話か？

246

： デフォルトの名無しさん [sage] 2018/12/19(水) 02:27:25.69

:esnyd6IN

Ruby なら、a が1 の時は、処理1・2、
aが2 の時は、処理A・B、
上記以外は、処理X・Y

if a == 1
処理1
処理2
elsif a == 2
処理A
処理B
else
処理X
処理Y
end

247

： デフォルトの名無しさん [] 2018/12/19(水) 02:40:37.42

:DnYaqc+Z

>>244

まず今のコード晒せよ
みんなエスパーじゃないんだから

248

： デフォルトの名無しさん [sage] 2018/12/19(水) 06:44:44.72

:sYwMlaDi

>>245

さん
そのような処理が行いたいです。

>>246

cではそのような処理は可能でした。
ruby ではない、rubyが動く環境ではないので

249

： デフォルトの名無しさん [sage] 2018/12/19(水) 07:34:58.43

:BIch1OKH

コードがわからない限りどうしようもない

250

： デフォルトの名無しさん [] 2018/12/19(水) 08:02:19.27

:+DSMRKxP

if文のthen で
処理複数行実行できますか？というだけのつもりでしたが。
コード準備してまた質問します。
ありがとうございました。

251

： デフォルトの名無しさん [sage] 2018/12/19(水) 08:10:35.82

:meuITI5l

>>240

???
例だと言ってるのにw
例を挙げたのは俺だから決めつけも糞もない。
日本語の問題なのか悔しくて冷静な判断もできないのか分からんが相変わらず頓珍漢な所に絡んでくるねw

ハンバーグを作るという要件に対して

はマッシュポテトを元々作るということになっていると思った。
それでじゃかりこにお湯を注げば1分という発言になった。

それをお前は頓珍漢と断ずるには、その発言の内容を理解しなければならない。
内容が全く分からなかったら頓珍漢かどうかも分からないからな。
そのお前の理解(ハンバーグが1分でできると解釈)が頓珍漢なんだろうが。

従って

が頓珍漢かどうかに関係なくお前が頓珍漢なのが確定なんだよ。

252

： デフォルトの名無しさん [sage] 2018/12/19(水) 08:15:13.01

:6uBXCGRB

>>250

ThenからEnd Ifまでは処理をいくつ書いてもすべて実行される
If 条件 Then
　処理1
　処理2
　処理3
End If

253

： デフォルトの名無しさん [sage] 2018/12/19(水) 08:19:00.70

:rGeO8V+1

>>251

> ハンバーグを作るという要件に対して

はマッシュポテトを元々作るということになっていると思った。
何度書いても頓珍漢なものは頓珍漢なままだよ

> なお反論したいなら
>> マッシュポテトはハンバーグの付け合わせだから元々作ることになっている。
> が正しいと言う根拠持ってきてからにしてくれ
に答えられないなら黙ってた方がいいぞ w

254

： デフォルトの名無しさん [sage] 2018/12/19(水) 08:27:36.44

:meuITI5l

>配列への格納とオートフィルターが常に関係するわけじゃないのと同じでハンバーグとマッシュポテトは常に関係するわけじゃない
それぐらいは理解できるよね？

常に関係しなくても全くかまわないんだよ。
普通の人間は相手が何かを言った時、それはどういう意味か理解しようとする。
理解しないと頓珍漢かどうかも分からないから当然のことだ。
常に関係するわけじゃなくても、

の頭の中ではハンバーグの付け合わせにマッシュポテトを考えたのだろうくらいは想像する。
そういう想像も全くせずに頓珍漢だというなら1分に言及することなく最初から頓珍漢だと言うだろう。

そこでお前はお前の理解の元に「じゃがりこにお湯を注いだくらいでハンバーグが1分で出来るの?」と発言したのと同じ状態になっている。
俺はそのお前の理解の元がおかしいのではないかと言っている

255

： デフォルトの名無しさん [sage] 2018/12/19(水) 08:30:26.96

:meuITI5l

>>253

頓珍漢であってもお前は「じゃがりこにお湯を注いだくらいでハンバーグが1分で出来るの?」と発言した状態になっている。

この発言が正しいのか?

256

： デフォルトの名無しさん [sage] 2018/12/19(水) 12:22:13.52

:wuMW/q40

なんでプログラム板住民は機械言語じゃなくて自然言語の言葉尻を捉えて追求したがるの？

257

： デフォルトの名無しさん [sage] 2018/12/19(水) 12:31:57.08

:rGeO8V+1

>>254

> 普通の人間は相手が何かを言った時、それはどういう意味か理解しようとする。
だから

で
> フィルタ掛けた結果を一気に配列に読み込むってできたっけ？
って確認してる
それに対して

みたいな頓珍漢なレスが来たんだが w

>>255

はマジで意味不明だから無視するね

258

： デフォルトの名無しさん [sage] 2018/12/19(水) 12:56:12.77

:meuITI5l

>>257

相変わらずのバカっぷり。

お前の

で「(要件を満たすのに)VBAで1行で書けるぞ
って方法があるみたいなことを書いてるので聞いただけ」という発言に対して俺は「

の発言の1行とは(オートフィルタを掛けるのに)VBAで1行で書けるぞ」という意味なのでは?聞いたんだが。

259

： デフォルトの名無しさん [sage] 2018/12/19(水) 17:12:30.63

:rGeO8V+1

>>258

> (オートフィルタを掛けるのに)VBAで1行で書けるぞ
だからその回答になんの意味があるんだよ？
って何度も書いてあるんだが
意味があるというならその意味を書いてみなよ

260

： デフォルトの名無しさん [sage] 2018/12/19(水) 17:42:15.83

:kLNFuq6V

相変わらず何の臆面もてらいもなくRubyを持ち出すヴァカ w

261

： デフォルトの名無しさん [sage] 2018/12/19(水) 18:26:58.94

:meuITI5l

>>259

意味が有ろうが無かろうがお前の解釈が間違いだと言ってる。

意味が無かったらお前の間違いは無くなるのか?
無くならねえよ。

262

： デフォルトの名無しさん [sage] 2018/12/19(水) 18:39:33.72

:meuITI5l

元々のやり取りは以下の通り。

「VBAで1行で書けるぞ」

(お前)「フィルタ掛けた結果を一気に配列に読み込むってできたっけ？」

>>119

(俺)「1行とはフィルタ掛ける部分のことを言ってるんじゃない?」

(お前)「要件とは違うフィルタだけのことを言われても」

>>123

(俺)「そうだけど、

で言ってる1行はフィルタだけと受け取る方が自然」

>>124

(お前)「ガイジなのかな?」

どっちがガイジだよ

263

： デフォルトの名無しさん [sage] 2018/12/19(水) 18:41:10.55

:GtWYIo2s

vbaでcsv出力するとしたら色々やり方あるけど何が良いんだろう
fso?

264

： デフォルトの名無しさん [sage] 2018/12/19(水) 19:02:08.13

:rGeO8V+1

>>261

> 意味が有ろうが無かろうがお前の解釈が間違いだと言ってる。
> 意味が無かったらお前の間違いは無くなるのか?
> 無くならねえよ。
根拠出さないと何度繰り返してもそれこそ「意味ないぞ」w

>>262

誰も自然かどうかなんて聞いてないからな
ガイジかもしれないと思うのは当たり前のこと

265

： デフォルトの名無しさん [] 2018/12/19(水) 20:15:44.96

:As82n4u7

>>262

くだらない言い争いの元ってこれなのか？
：で区切れば1行で書けるだろ。

お前ら馬鹿か？

266

： デフォルトの名無しさん [sage] 2018/12/19(水) 21:21:27.33

:38k2t73z

>>250

Thenのあとに続けて同じ行に命令書いてないか？
Thenで改行したら、End If（かElse）まで条件判定で実行されるぞ

267

： デフォルトの名無しさん [sage] 2018/12/19(水) 22:17:38.71

:uZ99WTE6

>>266

あれは確かに糞仕様といっていいね

268

： デフォルトの名無しさん [sage] 2018/12/19(水) 22:22:43.60

:meuITI5l

>>264

根拠は何度も出している。
日本語が不自由なお前が理解出来て無いだけ。

そりゃお前は自然かどうかは聞いてないさ。
お前が聞いたこと以外を言うとガイジになるなら皆がガイジはお前と言うだろう。

269

： デフォルトの名無しさん [sage] 2018/12/19(水) 22:34:20.70

:Ra+okmqw

シートは回転できないでしょうか?
マリオカートの地面みたいな感じで。

270

： デフォルトの名無しさん [sage] 2018/12/19(水) 23:00:26.30

:6uBXCGRB

>>269

Excel単独ではできない

271

： デフォルトの名無しさん [] 2018/12/19(水) 23:22:19.99

:DnYaqc+Z

カメラ機能で貼り付けて回転させればワンチャン

272

： デフォルトの名無しさん [sage] 2018/12/19(水) 23:48:46.06

:v1yTSLob

>>263

outputもあるよ

273

： デフォルトの名無しさん [] 2018/12/20(木) 00:16:14.50

:JEb4hZ4L

バカとバカの死闘もう決着ついたんか？バカ勝った？

274

： デフォルトの名無しさん [sage] 2018/12/20(木) 06:48:12.04

:As7dWUw1

>>268

> 根拠は何度も出している。
> 日本語が不自由なお前が理解出来て無いだけ。
ん？
２通りの解釈ガーってやつのこと？
どう解釈しても頓珍漢なことに変わりないと何度も書いてるし、そもそもその２通りの解釈すら具体的に提示されてない

> そりゃお前は自然かどうかは聞いてないさ。
> お前が聞いたこと以外を言うとガイジになるなら皆がガイジはお前と言うだろう。
会話の中でいきなり聞いてもないことを喋りだす？
お前がコミュ障であることはわかったよ w

275

： デフォルトの名無しさん [sage] 2018/12/20(木) 08:04:34.66

:5qyubQfm

>>274

どうしょうも無いバカ。
頓珍漢でもお前は間違いと言ってるだろ。
その根拠も既に何度も書いてる。
2通りの解釈も何度も書いてる。

オ―トフィルタを掛ける処理のみを1行と解釈するのと要件全てを満たす処理に1行と解釈するのの2通りだ。

日本語か通じないバカ。

、

、

、

、

、

、

： デフォルトの名無しさん [sage] 2018/12/20(木) 08:05:15.91

:5qyubQfm

、

、

、

、

で提示してるわ。

アンカー多すぎて怒られる程提示してる。

277

： デフォルトの名無しさん [sage] 2018/12/20(木) 08:11:10.39

:5qyubQfm

>>274

会話のやり取りとして関係有るなら聞かれたこと以外を話すのは全くおかしくない。
少なくとも

と

>>123

のやり取りをおかしいというならガイジはお前だろう。

278

： デフォルトの名無しさん [sage] 2018/12/20(木) 08:32:01.59

:As7dWUw1

>>275-277

> オ―トフィルタを掛ける処理のみを1行と解釈
要件を満たさない頓珍漢な回答

> 要件全てを満たす処理に1行と解釈
それかと確認したらより頓珍漢な

がしゃしゃり出てきた w

いずれにせよ質問者の要件満たしてないクズ解釈

> 日本語か通じないバカ。
お・ま・えだよ

> 会話のやり取りとして関係有るなら聞かれたこと以外を話すのは全くおかしくない。
お前はあえて無視してるみたいだけど

で関係性を問うてるからその解釈は無理がある

279

： デフォルトの名無しさん [sage] 2018/12/20(木) 09:21:52.23

:5qyubQfm

まだ分かってないのかよ。
お前が

が頓珍漢かどうかを判定するところでお前はもう間違っている。
ということはお前は

が頓珍漢かどうかも判定出来ていないということだ。
だから結果的に

が頓珍漢だったとしてもお前も頓珍漢なんだよ。

お前は間違った判断の元に

を頓珍漢と言ってる。

>普通に一気に配列に読み込んで空白行を詰める処理を入れればいいかと

に対して「空白行を詰める処理を入れれば」の文言を理解出来ずに、配列に空白行が残るなとどしてお前の案を頓珍漢と断じることに問題は無いのか?
文言を理解出来ない方が頓珍漢だろう。

これと同じでお前の

を頓珍漢だとする根拠が間違ってる。

280

： デフォルトの名無しさん [] 2018/12/20(木) 09:43:04.50

:uzBoRH9c

ttp://https://youtu.be/HjJjqSjTJwY

この人の頭いい自慢、笑いがとまらない(ﾜﾗ
自画自賛のみの動画。
自分が恥ずかしくならないのか？
たぶん恥ずかしい動画と気づいたらすぐ消すだろうが今はそれに気づいていない。

とにかく笑えます。

281

： デフォルトの名無しさん [sage] 2018/12/20(木) 12:23:32.88

:As7dWUw1

>>279

> お前が

が頓珍漢かどうかを判定するところでお前はもう間違っている。
根拠のない妄想乙

> ということはお前は

が頓珍漢かどうかも判定出来ていないということだ。
妄想に基づく頓珍漢な解釈乙

> だから結果的に

が頓珍漢だったとしてもお前も頓珍漢なんだよ。
もう論理も何もない幼児が喚いてるレベル

> お前は間違った判断の元に

を頓珍漢と言ってる。
それ、お・ま・え

> に対して「空白行を詰める処理を入れれば」の文言を理解出来ずに、配列に空白行が残るなとどしてお前の案を頓珍漢と断じることに問題は無いのか?
バカなの？
書いてあって理解できないことと、書いてもないことは全然違う話
そんな理解力もないから
> これと同じでお前の

を頓珍漢だとする根拠が間違ってる。
なんて頓珍漢な結論で玉砕するんだよ w

282

： デフォルトの名無しさん [sage] 2018/12/20(木) 12:50:33.53

:5qyubQfm

>>281

根拠は既に何度も書いているのに理解出来ないバカ。
反論出来ないからもうそれでやり過ごそうとする意図がミエミエ。
もうお前の根拠無いは通じない。
根拠はあると言ってるし、場所も言っている。
その根拠がおかしいというならわかるが無いじゃ話にならん。

ところで全く笑わせてくれるが、お前の発言こそ全部ブーメランだ。

>それ、お・ま・え
プッ。
俺は

を頓珍漢だなんて断じて無いんだが。
日本語ワカリマスカ?

全然違う話ではない。
間違った判断の元に相手を断じれば、結果的に頓珍漢でも頓珍漢でなくても間違いだ。
書いてある、書いてないは関係ない。
この例は、お前の主張通りだと断じる側が頓珍漢で間違った判断をすれば断じられる側が頓珍漢になってしまうのか?という例だ。

2通りの解釈ができなかったお前が

を頓珍漢と断じてもダメということだ。

283

： デフォルトの名無しさん [] 2018/12/20(木) 16:14:40.53

:bktnWAv8

馬鹿の馬鹿による馬鹿同士の罵り合い

284

： デフォルトの名無しさん [sage] 2018/12/20(木) 17:25:31.33

:g4q3VPrO

これ何日連続でやってんの？

285

： デフォルトの名無しさん [sage] 2018/12/20(木) 17:43:06.63

:XT76bUiU

からなら10日間かな。

は（このレスを含まないで）コメント数44件になっているw

286

： デフォルトの名無しさん [] 2018/12/20(木) 17:56:31.30

:2i7dcD7b

（このレスを含まないで）のアスペ感w

287

： デフォルトの名無しさん [sage] 2018/12/20(木) 18:37:50.96

:As7dWUw1

>>282

> 2通りの解釈ができなかったお前が
まだ言ってるの？
お前はわざと無視してるけどそんな可能性は

で確認してる

が回答すれば良かったものをガイジの

がしゃしゃり出てきて頓珍漢なレスしただけだろ w

288

： デフォルトの名無しさん [sage] 2018/12/20(木) 18:42:03.57

:dp1AZAWh

>>284

このスレをこれで埋め尽くすまでじゃね？ w

289

： デフォルトの名無しさん [] 2018/12/20(木) 20:10:52.84

:2i7dcD7b

>>288

もう相当飽きとるでおまえみたいなバカがおもろいんは一時的なもんやし

290

： デフォルトの名無しさん [] 2018/12/20(木) 22:31:27.95

:/FsMMWOI

VBAエンジニアって宣言するのって恥ずかしいことなのかな？
ツイッターのWEB屋達からは苦笑されるし、現場でもVBAは簡単的な扱いで
あまりいい意味で捉えられないように感じる

経歴的にVBA触ってた時間が長いし、
Windows と相性良いし、
VBAなんで叩かれてるんだろう？

291

： デフォルトの名無しさん [] 2018/12/20(木) 22:38:23.73

:2i7dcD7b

webパーはバカやからおいとくとしても
VBAエンジニアとゆうてもうたら言語としてのVBAをメンテナンスしとるエンジニアと思われるやろ
そこはただのエンジニアでええねん開発言語として主にVBAつことるゆうだけで

てかVBA叩いとるのこのスレにおるプロさんゆうバカな連中だけやぞw

292

： デフォルトの名無しさん [sage] 2018/12/20(木) 23:05:37.29

:rQxzM92i

ロックマン作れるレベルなら、バカにされないんじゃないの?

293

： デフォルトの名無しさん [sage] 2018/12/20(木) 23:13:35.65

:7HwS24Ld

>>290

恥ずかしいんじゃなくて、根本的に間違ってるんだよ

アプリの開発にはVBAは適してないし、普通は使わない
ちょっとでも複雑なことをしようとするとAPIが必須になるし、ツールも貧弱で開発の効率が悪いから
そして、ワークシートに付属のマクロを書くだけの人はエンジニアと呼べるレベルにないことが多い

まあVBAで作られた社内アプリもあちこちで見た事あるけど、とにかく結果さえ出ればいいって感じでひどいもんだった
体裁の整ったアプリも作れないことはないけど、それこそVBAでは無駄に手間がかかるだけで、ようするに言語(道具)の選び方が適切じゃない

294

： デフォルトの名無しさん [sage] 2018/12/20(木) 23:17:37.85

:7HwS24Ld

>>292

趣味ならいいけど一般的に商品はVBAで作るわけにいかない
同じ物がVB.netならもっと少ない手間で作れるんだから、開発コストの無駄遣いになる

295

： デフォルトの名無しさん [sage] 2018/12/20(木) 23:19:19.18

:7HwS24Ld

「趣味でシステムエンジニアやってます」というのは成立しないと思うのは俺だけか？
趣味の一つとして認知されてるんなら、ここまで俺が書いたことは完全にひっくり返ってしまう

296

： デフォルトの名無しさん [sage] 2018/12/20(木) 23:22:10.52

:7HwS24Ld

別に国家資格が必要なわけじゃないから「俺は(VBA)エンジニアだ」と名乗るのは自由
聞いた人がどう思うか、どう思われるかはわからない

297

： デフォルトの名無しさん [sage] 2018/12/21(金) 00:33:22.33

:ykBrDntQ

>>290

　VBAは、あくまでOffice付属のマクロ言語なので、そこに何十年(最大24年)もしがみついてるとかだと、
自己紹介でそうと言われたら、叩くまではないにしても、「はぁ」で流しはするかも知れない。
　他の色々出来る中で、「VBAも触れます」なら、構えられることもないんじゃないかな。

298

： デフォルトの名無しさん [sage] 2018/12/21(金) 00:45:40.95

:t4pJ79vS

情報処理資格を受かった学生が「こんなの誰でも受かりますよ」って言うけど、
10年以上受からない奴は「いや、そんな簡単じゃないよ」って答える

会社では、新人・老害の会話が噛み合わないw
そういう老害が新人に教えるから、矛盾だらけw

勉強していない奴は、システムを組めない。
何も知らんからw

データ処理に適さない、表示情報が入った、Excel, PDF を成仏させる供養寺を、
住職(エンジニア)が開催してるw

299

： デフォルトの名無しさん [sage] 2018/12/21(金) 01:07:43.82

:KP9XHOoX

普通にプロとしてやってる人なら、言語仕様とライブラリ構成さえわかれば、どんな言語でも一定の結果は出せるもんだ
VBAだって言語の一つとして、文法や演算子、変数タイプ、組み込み関数なんかが把握できればプログラムは書けて当たり前なんだよ

300

： デフォルトの名無しさん [sage] 2018/12/21(金) 02:33:59.15

:j+w4FFhE

>>287

バ－カw
お前が確認したのはお前の1通りの解釈を元に一気に配列に読み込めるかどうかだけだ。

本来、以下のようにすべきところを
Function Check112(strHatsugen As String) As String

If strHatsugen="要件全てを1行" Then
Check112="頓珍漢"
Else If strHatsugen="オ－トフィルタのみ1行" Then
Check112="頓珍漢"
End If

End Function

お前のコードは以下の通りだ。
Function Check112(strHatsugen As String) As String

If strHatsugen="要件全てを1行" Then
Check112="頓珍漢"
End If

End Function

お前のコードではstrHatugen="オートフィルタのみ1行"の場合、戻り値は"頓珍漢"とならない。

301

： デフォルトの名無しさん [sage] 2018/12/21(金) 03:18:22.04

:KP9XHOoX

空白を取り除いて配列に入れるのって、結局どうやるのが一番シンプル？
マルチステートメントはとりあえず無しとして、作業シートを使って3行までは短縮できたけど
(セル範囲が決め打ちだからできたとは言えないかな

Sheets("Sheet1").Range("A:C").AutoFilter Field:=1, Criteria1:="<>"
Range("A1:C5").Copy Destination:=Sheets("Sheet2").Range("A1")
ary1 = Sheets("Sheet2").Range("A1:C3")

302

： デフォルトの名無しさん [sage] 2018/12/21(金) 05:00:28.02

:PkTs+Gix

>>300

夜中まで必死に考えたんだろうな… w

303

： デフォルトの名無しさん [sage] 2018/12/21(金) 07:57:42.03

:zXpLrdoZ

>>290

他の言語と比べて微妙だから
vbaでも出来るけど他の言語ならもっと楽　なんで使わないの言語使えないの？て思考する人が一定数いるから

304

： デフォルトの名無しさん [sage] 2018/12/21(金) 08:20:20.78

:j+w4FFhE

>>302

普段から寝るのはあんなもんだ。

>>301

実際のところ、俺も「普通に一気に配列に読み込んで空白行を詰める処理を入れればいいかと」だね。

でも、データ総数300とかじゃどんなやり方でも良いし、気にしない。
効率を気にするなどと言っていても、実際は他で大きなロスしてても気にしない奴多数。
動かした所で大きなロスをしてる所がデータ読み込み部分と分かってから考えれば良い。
俺は一気に配列に読み込むのに慣れてるし、それで早いからそうするのが普通なだけで。

そもそもこういう場合でよくよくやりたいことの詳細を聞くと配列に取り込む必要が無かったりする場合も多い。

305

： デフォルトの名無しさん [sage] 2018/12/21(金) 08:22:45.52

:j+w4FFhE

>>301

あと、コードの量を減らすのはあまり意味が無い。
速度のためにコードの量はかなり増えることがある。

306

： デフォルトの名無しさん [sage] 2018/12/21(金) 08:32:12.60

:choQhZIj

誰でも知ってるようなことでドヤ顔ww

307

： デフォルトの名無しさん [sage] 2018/12/21(金) 15:58:03.36

:HaYV4Ucy

突っ込みが幼稚

308

： デフォルトの名無しさん [sage] 2018/12/21(金) 20:47:54.84

:GEdmC2dK

VBとVBAを間違えてるやつがいるよな

309

： デフォルトの名無しさん [sage] 2018/12/21(金) 22:54:11.09

:PkTs+Gix

310

： デフォルトの名無しさん [sage] 2018/12/22(土) 04:42:53.90

:LntJy5xX

アンカーを重ねて煽るのは幼稚

311

： デフォルトの名無しさん [sage] 2018/12/22(土) 06:45:30.74

:FmWZGIo3

>>310

312

： デフォルトの名無しさん [sage] 2018/12/22(土) 21:23:35.57

:P36khfsB

アンカーだけで煽った気になるのは幼稚

313

： デフォルトの名無しさん [sage] 2018/12/23(日) 00:54:04.25

:9AXglOVX

>>312

314

： デフォルトの名無しさん [sage] 2018/12/23(日) 09:47:19.69

:qHW9w8NX

>>313-314

>>312

315

： デフォルトの名無しさん [sage] 2018/12/23(日) 10:45:49.13

:lGbB3Xz8

>>314

ttp://https://sugoikaizen.com/excelvba/worksheets_sheets/

316

： デフォルトの名無しさん [] 2018/12/23(日) 14:14:36.79

:52OagQlj

バカvsバカはまだ静かに継続中かw

317

： デフォルトの名無しさん [sage] 2018/12/23(日) 15:09:00.33

:O7Ty6bBB

listviewでマルチセレクトから通常にもどすさいに再描画してるんですが、そのさい行がずれるんですが　listboxのtopindexみたいなものはないのでしょうか?　どうすればずれないようにできますか？

318

： デフォルトの名無しさん [sage] 2018/12/23(日) 19:45:55.65

:M7vXJwnP

チェックボックス有効無効をきりかえるため再描画してます。その際行がずれます。　すみませんでした。

319

： デフォルトの名無しさん [sage] 2018/12/24(月) 22:13:09.28

:USpopZY5

Excel VBAにlistviewなんてあったか？

320

： デフォルトの名無しさん [sage] 2018/12/24(月) 22:49:04.51

:+FgUdfMA

あるよぉ

321

： デフォルトの名無しさん [sage] 2018/12/24(月) 23:02:54.97

:kr6Bf1Pl

参照設定でね。

322

： デフォルトの名無しさん [sage] 2018/12/24(月) 23:56:46.20

:USpopZY5

それはVBAじゃないし
何を参照設定したかちゃんと書けよ

323

： デフォルトの名無しさん [sage] 2018/12/25(火) 00:16:00.70

:su/K5Fi6

参照設定もVBAの機能の一つだろ
デフォルトでもいくつか入ってるし、ファイル操作する時はFSOを追加するし、Outlookの操作も定番のテクニックだし

324

： デフォルトの名無しさん [sage] 2018/12/25(火) 01:26:51.15

:fCRLWXqM

ListViewはライセンス的に微妙なんだよな。
配る場合はダメだった気がする。

恐ろしく面倒な方法で実装すればライセンス的にも問題無いけどそこまでやれる人は殆どいないと思う。

325

： デフォルトの名無しさん [sage] 2018/12/25(火) 01:55:29.77

:fCRLWXqM

あとツールボックス右クリックでその他のコントロールを参照設定とは呼びたくないな。

326

： デフォルトの名無しさん [sage] 2018/12/25(火) 07:15:44.70

:wRBkGyE7

>>325

設置すると勝手に参照設定されますから、同じことです

327

： デフォルトの名無しさん [sage] 2018/12/25(火) 08:33:21.08

:gnAfBdjP

お前が呼びたいとか呼びたくないとか、お前の気分なんぞ知ったことではない

328

： デフォルトの名無しさん [sage] 2018/12/25(火) 18:45:28.39

:Is6QTt21

Excel に入ってるんじゃないの？

329

： デフォルトの名無しさん [] 2018/12/25(火) 23:18:20.70

:wH59ARy4

入っとるね

330

： デフォルトの名無しさん [sage] 2018/12/26(水) 01:42:12.21

:BN5rbpb6

いまのExcel VBAに標準でListViewあるのか？

331

： デフォルトの名無しさん [sage] 2018/12/26(水) 05:15:51.11

:43KasKaO

標準の意味とは

VBA可の環境ならコントロールの追加は誰でもできるが

332

： デフォルトの名無しさん [sage] 2018/12/26(水) 13:12:31.75

:RgV9orAX

シートのコピーでafter:＝worksheets.countしても最後尾に追加されないことがあるんだけど何これ
通常なら問題無い非表示シートだか同名シートだかが混ざると不穏な動きする

333

： デフォルトの名無しさん [sage] 2018/12/26(水) 17:11:11.31

:43KasKaO

>>332

思い込みで書いててて仕様を正確に理解してない
コード晒してみ

334

： デフォルトの名無しさん [sage] 2018/12/26(水) 17:49:40.48

:Le9KM/M7

>>332

afterに入れるのはシートオブジェクトやで？

335

： デフォルトの名無しさん [sage] 2018/12/26(水) 21:16:35.59

:Y8+MwfS4

>>332

336

： デフォルトの名無しさん [sage] 2018/12/27(木) 18:50:28.99

:0mQlyYIj

Worksheets.Countだけ指定して最後尾にシート追加することもできるんだな。初めて知ったわ。

337

： デフォルトの名無しさん [sage] 2018/12/28(金) 00:28:35.21

:M7adF/cl

>>333

解決してるけど状況だけ説明
Thisworkbook.Worksheets("雛形").Copy After:=Thisworkbook.Worksheets(Worksheets.Count)
普通に実行出来て追加される　けど末尾に追加されない
雛形シートは非表示で他にブック開いてないのが前提
原因は他の非表示シートが末尾にあったから？ぽい見えるシートの末尾に追加されてた
原因があってるのかは不明だけどコピーの前に全シート表示させる処理書いたら想定どおりに末尾に追加されたから解決としてそれ以上調べてない

338

： デフォルトの名無しさん [sage] 2018/12/28(金) 08:07:29.84

:7PkHI2ZE

>>337

これで解決は酷いなあ。
このコードじゃダメだろ。
初心者が一番ハマるのに引っ掛かってる。

Worksheets.Countはどのブックのシート数を示してるの?
人間の思い込みと現実が違うことはよくある。
ブックが複数開いてたらThisworkbookがActiveとは限らない。

まあ、これが原因かどうかは分からんけど。

339

： デフォルトの名無しさん [sage] 2018/12/31(月) 13:34:36.98

:P9+LicCn

コピーしたシートも非表示に設定されてるからじゃね？

340

： デフォルトの名無しさん [sage] 2019/01/03(木) 20:12:26.04

:m9d94GZ9

すみません、一般論として教えてください

一つのプロージャ内に複数のForNext文を使う場合
カウンタ変数はそれぞれ用意したほうがいいんでしょうか？
それとも全部「i」とかで固定したほうがいいんでしょうか？

341

： デフォルトの名無しさん [sage] 2019/01/03(木) 20:38:50.80

:rHu6ErP8

単純にカウンタとしてしか意味が無くて充分に短いループなら全部iでいいよ

342

： デフォルトの名無しさん [sage] 2019/01/03(木) 20:52:55.74

:m9d94GZ9

>>341

ありがとう
これまで全部「i」で統一してて他で使いたいときは違う変数に明け渡したり…ってしてたんだけど
この前業者の人が書いたコードを見たらそれぞれに変数を与えてたので…
デバッグの時に有利？とか何かプログラム業界の常識みたいなのがあるのかな？と気になって

343

： デフォルトの名無しさん [] 2019/01/03(木) 21:24:04.00

:3ahyrkeA

>>342

自分の頭使えよ

344

： デフォルトの名無しさん [sage] 2019/01/03(木) 21:38:30.48

:BKcPgeWW

>>342

他で使いたいときに明け渡すなら最初からそれぞれ違う名前にした方がいいんじゃね

345

： デフォルトの名無しさん [sage] 2019/01/03(木) 22:08:38.04

:/hb1raIC

>>343

ここ質問スレだからそういう幼稚な発言はやめようね。
色んなレベルの人がいるから。

346

： デフォルトの名無しさん [sage] 2019/01/03(木) 22:16:13.64

:rzUuzEne

>>340

そもそもプロは1つのメソッドに複数のループを書かない

347

： デフォルトの名無しさん [sage] 2019/01/03(木) 22:45:11.18

:9E4VKJOH

>>340

「プロシージャ」な
procedure

348

： デフォルトの名無しさん [] 2019/01/03(木) 22:57:49.15

:YFBXiFl7

>>342

ループがネストする場合にi,j,kとしたりするのは
FORTRAN由来でコンピュータ黎明期からある
外部リンク

ttp://https://qiita.com/yaju/items/38f63900491d4ac51af7
座標だとx,yとかで回したりもするがあまり長い名前は使わない方が良いかと

349

： デフォルトの名無しさん [sage] 2019/01/03(木) 23:18:24.27

:rHu6ErP8

i,j,kは慣習だけど、それ以外はループ変数といえど意味のある変数名を使うほうがいいぞ
長い名前使うなとか、インタプリタ時代の悪習でしかない

いかにわかりやすい変数名つけるかはセンスもあるけどな

350

： デフォルトの名無しさん [sage] 2019/01/03(木) 23:56:28.99

:2qiD+7+U

俺は行ならrow、列ならcolumn、インデックスならindexとかにして
なるべくi, j, kとか使わないわ、別にこだわりはないけど

351

： デフォルトの名無しさん [] 2019/01/04(金) 00:30:47.29

:3QLIqJfD

俺は一文字だけじゃ見失うから
iii jjj kkk ccc rrrって3文字連打してる
別の変数名への置換もしやすいしね

352

： デフォルトの名無しさん [sage] 2019/01/04(金) 00:32:01.54

:GFUZolCB

みなさんどうもありがとう
自分はプログラム屋ではないので業界の常識？みたいなものがあれば知りたくて

今までは使うなら「i」、構造的にかぶるなら「j」あたりを使ってましたが
その都度意味のある変数を使う方が多いんでしょうか
その他の変数も基本一文字が多いんですけどこれもあまり誉められたことでは無いのかな

353

： デフォルトの名無しさん [] 2019/01/04(金) 00:39:25.54

:T+XMZC4N

>>352

馬鹿は頭を使うことができんの？

354

： デフォルトの名無しさん [sage] 2019/01/04(金) 02:10:11.62

:+nkelZ7z

>>350

そんな予約語っぽいの、使いたくない。

355

： デフォルトの名無しさん [sage] 2019/01/04(金) 02:40:32.55

:MgMPlhfY

俺は row col idx i i2 i3 をよく使う

356

： デフォルトの名無しさん [sage] 2019/01/04(金) 07:27:59.80

:M3G9sl2d

シート上の特定Rangeを表してるときならrowとcolumnもありだけど、一般にはiとjかな
それ自体が検索対象になることもまずないし

357

： デフォルトの名無しさん [sage] 2019/01/04(金) 08:41:36.91

:zy8oD3uq

ローカルのカウンタ変数をiで使いまわしてるけどi2とか分けたほうが良いの？
好み？

358

： デフォルトの名無しさん [sage] 2019/01/04(金) 09:27:17.18

:+4+fWqKR

>>357

誤読の可能性があるなら、分けた方がいいと思う。

>>349

,350あたりが妥当じゃないかな。ただ、例えば行そのものでは
なく行を導出するための数値を入れる変数には、rowじゃなくてrowナントカ
だのにした方がいいのかな。単なるループカウンタならヘタに意味のある
名前を付けない方が「無意味なカウンタ変数です」ということを示すことが
できる気も。自分はループカウンタはとりあえず一文字二文字の変数を
放り込んでそのまま、ということが多い（簡単な処理しか書いたことない）。

359

： デフォルトの名無しさん [] 2019/01/04(金) 09:54:15.33

:DCvNugNP

個人目的ならそれこそ自由、自分が解りやすければなんでもいい
社内使用で他の人が今後も手を加える可能性があるなら
可読性と一般的な用途を考えてijk辺りがよいと思う

360

： デフォルトの名無しさん [sage] 2019/01/04(金) 10:05:37.21

:NtMlYI+L

カウンタ変数の1つや2つぐらいケチらず定義しろよ
それこそ先頭で
Dim i1 As Integer , i2 As integer,,, とかやっとけばいいだろ。
こう書くとIntegerよりLongだとか言い出すやつも出てくるけど w

361

： デフォルトの名無しさん [sage] 2019/01/04(金) 11:53:23.85

:aVQoc2JA

>>359

３ヶ月後の自分は他人

>>360

おれならそう書いてあったら、i1とi2になにかしら特別な意図があるのかと思う
それならちゃんと分かりやすい変数名をつけるべき

362

： デフォルトの名無しさん [] 2019/01/04(金) 12:16:24.95

:YvLbWmko

べきとかええねん
好きなようにしろや

363

： デフォルトの名無しさん [sage] 2019/01/04(金) 12:17:38.62

:M3G9sl2d

integer使う意味が分からんぞ
ループカウンタに限らず

364

： デフォルトの名無しさん [sage] 2019/01/04(金) 12:55:43.45

:aVQoc2JA

VBAは16ビットの時代から生き残ってるからなぁ

365

： デフォルトの名無しさん [sage] 2019/01/04(金) 14:22:56.70

:dyujBTAs

C++試食版みたいな

366

： デフォルトの名無しさん [sage] 2019/01/04(金) 15:06:28.56

:FLK7qEcT

文字コードでInteger使うよ

367

： デフォルトの名無しさん [sage] 2019/01/04(金) 17:11:54.33

:JnujQIz6

個人プログラムのときは Jは大文字にしてる
ijだとぱっと見差がないから
それから、行と列はc、r変数にしてる

368

： ◆QZaw55cn4c [sage] 2019/01/04(金) 18:43:57.47

:ry6hJENG

>>367

列・行では？

369

： デフォルトの名無しさん [sage] 2019/01/04(金) 22:12:41.23

:ZmFghfmj

officeのパッチにやられた

370

： デフォルトの名無しさん [sage] 2019/01/04(金) 22:26:40.57

:zvNc5eXN

i,j,kきらい
indexとかcountとかすき
rowIndexとかcolumnCountとかもっとすき

371

： デフォルトの名無しさん [sage] 2019/01/04(金) 22:35:43.15

:8kQ9PR43

好き嫌いはチラシの裏に

372

： デフォルトの名無しさん [sage] 2019/01/05(土) 01:06:17.29

:oO8mkqZ6

何が書いてあるのか、未来の自分がわかり、他人もわかるのが理想
昔ながらのルール(慣習)は理由なく破るべきではない

373

： デフォルトの名無しさん [sage] 2019/01/05(土) 03:31:35.86

:7TsgmPMW

意味のある変数なら意味のある名前をつけてくれよ

374

： デフォルトの名無しさん [sage] 2019/01/05(土) 07:37:32.77

:1YbtJ0wD

i j kは使い捨てのループカウンターとして世界中に広く認知されてるし入力のコストも低い
いちいち For TemporaryLoopCounter = 1 To 5 とか書きたい人は自由にすればいいけど、それこそ自己満足の世界だと思う

375

： デフォルトの名無しさん [sage] 2019/01/05(土) 08:45:01.70

:ORiRzU3d

長く使うプログラムほど扱う対象が汎用的で、変数が具体的に何を指すとか
限定できないため i, j, k になりがち。
逆に具体的対象を扱うプログラムだと変数名も具体的にした方が良いだろうが
汎用的に長く使うものではない。
何が言いたいかというと別に何でもありません。

376

： デフォルトの名無しさん [sage] 2019/01/05(土) 09:11:07.61

:xejHmutN

かなり乱暴だが
> 変数名の長さはスコープの広さに比例させるべし

377

： デフォルトの名無しさん [sage] 2019/01/05(土) 09:12:48.40

:tCoREms1

>>376

に同意
一般論でいうと、メンテナンス性に優れたプログラムを書くには次の点を意識するとよい
・変数の生存範囲はできるだけ狭く
・変数の生存期間はできるだけ短く
で、これを意識したプログラムの変数名は自然に短くなる
極論すれば、サブルーチンが適切に分割されていてサブルーチン名だけで何やってるか明らかなら、
その中の一時変数名なんか全部一文字でもいい

378

： デフォルトの名無しさん [sage] 2019/01/05(土) 14:06:52.83

:eDAGI3vR

そもそもループ回すのにループカウンタ使うのが時代遅れ
for each使え

379

： デフォルトの名無しさん [sage] 2019/01/05(土) 14:09:46.21

:tCoREms1

時代遅れとか言い出したらVBA自体が使えなくなる
ナンセンス

380

： デフォルトの名無しさん [sage] 2019/01/05(土) 14:28:05.44

:c7wm3fbX

For Each とループカウンタ使うのとどちらも一長一短あるのを知らない人は早く初心者を脱出してね。

381

： デフォルトの名無しさん [sage] 2019/01/05(土) 15:07:14.98

:ORiRzU3d

一長一短ていうか For Each はワンパターンな使い方しか出来ないからドヤ顔するようなもんじゃないな

382

： デフォルトの名無しさん [sage] 2019/01/05(土) 15:49:59.34

:xejHmutN

>>378

配列Aと配列Bの要素同士を足して配列Cに入れる
って言うのを
For a, b, c in A, B, C
c = a + b
Next
みたいに書けるならいいんだけどなぁ

383

： デフォルトの名無しさん [sage] 2019/01/05(土) 16:01:26.52

:oO8mkqZ6

C = A + B
って書けた方がいいな

384

： デフォルトの名無しさん [sage] 2019/01/05(土) 16:09:26.86

:ORiRzU3d

>>382

・そういう構文がない
・c に代入することが実はできない
の二つの意味でダメなんだよね

385

： デフォルトの名無しさん [sage] 2019/01/05(土) 16:17:56.11

:xejHmutN

>>383

それ自由度が低い
For a, b, c in A, B, C
If b <> 0 Then c = a / b Else c = 0
Next
みたいなことを書きたくなるとかありそうだし

386

： デフォルトの名無しさん [sage] 2019/01/05(土) 16:57:08.01

:BR5BglFG

linq for vba

387

： デフォルトの名無しさん [sage] 2019/01/05(土) 20:12:44.53

:FzRtN9wJ

>>376

しかしvbaにはプロシジャより狭いスコープがないんだよ

388

： デフォルトの名無しさん [sage] 2019/01/05(土) 20:30:12.97

:xejHmutN

>>387

だから何？
最近のモダンな言語と比べてもブロックスコープが無いくらいじゃないの？

389

： デフォルトの名無しさん [sage] 2019/01/05(土) 20:53:20.75

:tCoREms1

>>387

まともなプログラマならブロックスコープが欲しくなるような大きなプロシージャは書きません

390

： デフォルトの名無しさん [sage] 2019/01/05(土) 20:57:58.68

:FzRtN9wJ

実際使い捨てならそれで問題になる事はないんだが
使い捨てのループ変数がループ内でスコープが閉じないのがなぁ
あと宣言位置の問題もあるけど

391

： デフォルトの名無しさん [sage] 2019/01/06(日) 01:37:57.50

:ckNCIF8F

わかる方がいれば教えてください
ユーザーフォームに配置したラベルに、選択中のセルの値を表示したいです
他のセルをアクティブにしたらラベルの内容も次々と変わるようなものを作りたいです

初心者なりに考えたのですが、
セルの選択をダブルクリックにしてシートモジュールの
Private Sub Worksheet_BeforeDoubleClick(～)
みたいなものを使うパターン、
ユーザーフォーム側にアクティブセルの値を表示するためのボタンをつけるパターン、
それくらいしかラベルに表示する方法が思いつきません
思っていた上に書いたような動きのものが作れません
そもそもそんなものは不可能でしょうか
セルをアクティブにするだけでそんな動きをするものは作れたとしても重くて(？)実用的じゃないでしょうか

392

： デフォルトの名無しさん [sage] 2019/01/06(日) 01:43:01.14

:ckNCIF8F

ユーザーフォームが出ている時だけワークシートイベントを発生させることってできますか？

393

： デフォルトの名無しさん [sage] 2019/01/06(日) 01:56:18.52

:wuHdfDnO

>>391

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
UserForm1.Label1.Caption = ActiveCell.Value
End Sub

394

： デフォルトの名無しさん [sage] 2019/01/06(日) 02:17:03.95

:GQx3m9rS

>>392

発想が根本的に間違っている
イベントは自然に発生するものであり、それを制御しようなどと考えてはいけない
ユーザーフォームが出ていないときはイベントを無視すればよい

395

： デフォルトの名無しさん [sage] 2019/01/06(日) 06:33:59.75

:VjyciGNt

自分もVBA初心者だけど書いてみます

>>392

既に言われてるけど、
イベントの発生は操作できないから受け取り側でフォームが読み込まれてるか調べて、
実行するか選択する形になる

思いつく方法は、
・フォームが一つしかないなら、UserFormsコレクション（読み込まれたフォームの一覧）の要素数が1以上かを調べる
・UserFormsコレクションに該当のフォーム名（typename関数で取得できる）があるか調べる
・印になるパブリック変数を宣言し、フォームのInitializeイベント（読み込まれた時に発生するイベント）で適当な値を代入させ、その値を調べる。

もしくはWithEvents（これを付けて宣言した変数のイベントを受け取れる）でシートのイベントを受け取るクラスモジュールを用意して、
それにフォームのラベルを操作させる方法もある
余程シートに依存した目的でない限り、個人的にはこちらの方が自然だと思う

396

： デフォルトの名無しさん [] 2019/01/06(日) 11:55:51.09

:RBr8Qah/

Excel2010の人は1月3日版のアプデを入れないように

【Win】 WindowsUpdateで入れなくても良いKBリスト。2018年12月12日まで分
外部リンク

ttp://http://blog.livedoor.jp/nichepcgamer/archives/1039785182.html

397

： デフォルトの名無しさん [] 2019/01/06(日) 13:03:05.58

:BkO4LwOx

>>395

こんな初心者おる？

398

： 391-392 [sage] 2019/01/06(日) 13:13:13.46

:ckNCIF8F

>>395

さんが言ってることが全く分からないというか一度も触れた事がないので
これを機会に勉強してみます
謎のクラスモジュールを使ってみたいと思っていたので良かったです
みなさんありがとうございました

399

： デフォルトの名無しさん [sage] 2019/01/06(日) 13:25:33.73

:kaEteaA+

>>397

ググれば出てくることなんだから、初心者でも答えれるやろ。
まあ人によっては初心者は卒業したって判断しそうなくらいのレベルはありそうだが。

400

： デフォルトの名無しさん [sage] 2019/01/06(日) 14:02:55.44

:L4UGmOY3

>>397

新人研修の半ばぐらいかな

401

： デフォルトの名無しさん [sage] 2019/01/06(日) 15:46:11.59

:BcE7MgiE

>>398

UserFormで直接WithEvents付きの変数使えるぞ
いろいろチェックとかはぶくとこんな感じ

Private WithEvents ws As Worksheet
Private Sub UserForm_Initialize()
Set ws = ThisWorkbook.Worksheets(1)
End Sub
Private Sub ws_SelectionChange(ByVal Target As Range)
Me.Label1.Caption = Target.Value
End Sub

402

： デフォルトの名無しさん [sage] 2019/01/07(月) 02:40:02.74

:pgy1rNuG

>>397

プログラミング経験無いまま前任者から引き継いでしまったので、ここで色々教えて貰ってました
最近は調べ方も大体わかってきたので余り来ていませんでしたが、
アドバイス側に回ってもいいかなと思って書いてみました

>>398

分からないのはどの部分でしょうか
後半は

>>401

さんの通りです

>>401

ヘルプにクラスのみと書かれていたので、フォームでは使えないと思ってました・・・

403

： デフォルトの名無しさん [] 2019/01/07(月) 05:30:38.59

:fq4DjYiu

IntegerよりLongだ

404

： デフォルトの名無しさん [] 2019/01/07(月) 06:49:25.01

:fq4DjYiu

>>360

405

： デフォルトの名無しさん [sage] 2019/01/07(月) 18:19:40.41

:/LhWJ7aL

Dim tinko as Long

406

： デフォルトの名無しさん [sage] 2019/01/07(月) 21:52:39.53

:QrgUIT/b

俺しか見ることないだろうから、
Dim chinko&, unko$

407

： デフォルトの名無しさん [sage] 2019/01/07(月) 22:53:42.33

:pgy1rNuG

中学生か・・・

408

： デフォルトの名無しさん [sage] 2019/01/07(月) 23:07:15.99

:93Abj8CI

セルにindirectを入力しないでプルダウンを連動させる方法はありませんか？

名前”地区”　第一　第二　第三
名前”第一”　製造　塗装　
名前”第二”　プレス　溶接
名前”第三”　組立　検査

J列にプルダウン”地区”第一　第二　第三
K列が隣のJ列を参照してプルダウン（indirect)が変わるようにしたいのですが、
K列に=indirectを入力するとファイルサイズが大きくなるので避けたいのです。
何か良い方法はありませんか？

外部リンク

ttp://https://dotup.org/uploda/dotup.org1740935.zip.html
入力用のブックとupローダーに挙げた台帳ブックを分けた方がいいのは
確かなんですが、要求元は台帳で連動するプルダウンを使いたいとのことで
困っています。ご指導ご鞭撻のほどお願い申し上げます。

409

： デフォルトの名無しさん [] 2019/01/09(水) 10:11:24.83

:pekX2UBC

新元号対応の更新プログラムで早速バグ発生かよwww

410

： デフォルトの名無しさん [sage] 2019/01/09(水) 16:10:15.28

:HhjCvbTy

新元号対応パッチは4月1日以降にしか出せないだろ
それに今はOffice単体じゃなくてWindows側の日付管理APIで一括対応する仕組みになってるし

411

： デフォルトの名無しさん [] 2019/01/09(水) 16:50:06.39

:pp8qimk1

新元号アップデートでExcel 2010が起動しない不具合、Microsoftが削除を呼び掛け
外部リンク

ttp://https://internet.watch.impress.co.jp/docs/yajiuma/1160935.html

412

： デフォルトの名無しさん [] 2019/01/09(水) 17:45:40.84

:Ybhx7jcq

ただちに影響、出てるじゃん、何が立憲民主党だ、ホラ吹きの枝野！

2008年　12808万人　＋ 5万　△△△△△
2009年　12803万人　－ 5万　▼▼▼▼▼
2010年　12806万人　＋ 3万　△△△
2011年　12780万人　－26万　▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼
2012年　12752万人　－28万　▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼
2013年　12730万人　－22万　▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼
2014年　12709万人　－21万　▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼▼
外部リンク

ttp://lavender.5ch.net/test/read.cgi/asaloon/1546600138/l50
【モンサント、アマルガム】　厚労省、危険物を安心て、ふざけんな、国いらん。オノ・ヨーコ「来るな」
外部リンク

ttp://rosie.5ch.net/test/read.cgi/liveplus/1547000522/l50

413

： デフォルトの名無しさん [] 2019/01/09(水) 18:41:39.05

:B8oaeAR+

「ぼくが政権にいる間は影響無いことにしておきます」(のんのん)

414

： デフォルトの名無しさん [sage] 2019/01/09(水) 22:29:26.70

:60CROlND

安倍の犬うぜー

415

： デフォルトの名無しさん [sage] 2019/01/10(木) 00:17:06.97

:RQUJx46Y

ＶＢＡのフォームのツールボックスにコントロールを追加したいのですが、右クリックで「その他のコントロール」を追加してもコントロールの追加ダイアログが表示されず無反応のまま終わってしまいます。
ＷＩＮ７（64）　OFFICEは2010（32） 2013（32） 2016（32）を入れ替えましたが全て同じでした。
C:\Windows\System32　C:\Windows\SysWOW64　どちらにもFM20.DLLは入っています。
オフィスのクリーンアンインストールも試しました。ツールの参照設定で参照しなおしてもＮＧです。
ＯＳに問題があるかもしれませんが、何かチェック事項はありますか？
よろしくお願いします。

416

： デフォルトの名無しさん [sage] 2019/01/10(木) 00:28:18.54

:RQUJx46Y

>>415

です
参考までに、これと同じ状態です
外部リンク

ttp://https://answers.microsoft.com/ja-jp/msoffice/forum/all/excel/15087c63-48d1-48b8-84ba-4c6a693bc6e8

417

： デフォルトの名無しさん [sage] 2019/01/10(木) 13:01:25.04

:xPJRPdGO

fm20.dllで使えるコントロールってなんだ？

418

： デフォルトの名無しさん [sage] 2019/01/10(木) 15:17:22.62

:sOvEngqx

>>417

追加前の標準フォームのコントロール群です。
フォームを挿入するとエクセルのツールのメニューの方で自動的に有効になります。
ActiveXとかツールボックスのコントロールとか関係あるでしょうか？

419

： デフォルトの名無しさん [sage] 2019/01/10(木) 20:21:39.50

:MwVMQTRa

プログラム初心者ですがVBA勉強するのに優しく解説してくれてるサイト教えてください

420

： デフォルトの名無しさん [sage] 2019/01/10(木) 21:44:24.98

:RQUJx46Y

>>415

です
C:\Documents and Settings\ユーザ名\Application Data\Microsoft\Forms
の中を見たところEXCEL.boxのみでしたが、他何か入っていますか？

421

： デフォルトの名無しさん [sage] 2019/01/10(木) 21:59:37.39

:tfDJlaMd

>>418

自動的に有効になるならそのまま使えばいいじゃん

422

： デフォルトの名無しさん [sage] 2019/01/10(木) 22:06:22.42

:X3kdRf9X

>>419

ここ

423

： デフォルトの名無しさん [sage] 2019/01/10(木) 22:08:24.35

:MwVMQTRa

なんだお前きも

424

： デフォルトの名無しさん [sage] 2019/01/10(木) 23:01:57.46

:RQUJx46Y

>>421

有効になるのは「標準のコントロール」のみだけです。
使いたいのはWebBrowserコントロールなのですが、それはデフォで表示されていないので追加をする必要があります。
他のＰＣでは問題なく出来ていますが、１台だけ同じ手順で追加できないＰＣがあるので困っています。
外部リンク

ttp://image.itmedia.co.jp/ait/articles/1502/06/ExcelVBA9TipsForm_02.png
このイメージでいうとツールボックスに地球のアイコンがありますよね。これを追加するために
イメージ右半分のコントロールの追加のダイアログを出したいのですが出ないという意味です。

425

： デフォルトの名無しさん [sage] 2019/01/11(金) 02:46:48.54

:OnlOg3zM

>>424

同じ手順でできるPCとできないPCがあるならPC個別の問題かな
うちの環境では MicrosoftWebBrowser なら ieframe.dll を使っているようだけど

426

： デフォルトの名無しさん [sage] 2019/01/11(金) 03:33:50.23

:OnlOg3zM

フォームが表示されている画面で　表示→ツールボックス　
でツールボックスを表示してないと「その他コントロール」の項目が選択できないってやつかな？

427

： デフォルトの名無しさん [sage] 2019/01/11(金) 08:37:10.61

:sIbnloi9

いやいや、これは何かが壊れているわけで、当然PC個別の問題だし、ツールボックスが表示されている状態でその他のコントロールを選択すると普通は表示される筈のダイアログが表示されないという問題。

ExcelじゃなくてWindowsに問題のある可能性もある。

428

： デフォルトの名無しさん [sage] 2019/01/11(金) 09:14:26.57

:YHHsLUsK

返信ありがとうございます。
私もＯＳ自体に問題があると思いますが出先のＰＣなので実際誰が何をしているのやらな状態です。
私はプログラマーではないので詳細はわからないのですが、ダイアログの参照先を調べてみた限りでは
ActiveXコントロールのDLLを色々なフォルダに参照にいっているようで、さすがにこれだけけのコントロールが壊れているとは考えにくいため
コントロールを表示するためのＯＳとの手続きの部分がおかしくなっている気がします（ｏｆｆｉｃｅ側の要求にＯＳが応えない）
ＯＳを初期化してしまえば良いと思うのですがもしそれで何かあった場合私では責任が取れないのでお手上げの状態です……トホホ
まずはiframe.dllの所在を調べてみます。上司は私より疎いのでなんとかならないの？の一点張りですが
もしどうしようもない場合もう一度言ってみたいと思います。（多分ここで解らなければお手上げだと思うので）

>>426

ツールボックスは表示できます（フォームをアクティブにして、メニューの表示で選択）

429

： デフォルトの名無しさん [sage] 2019/01/11(金) 12:08:47.38

:OnlOg3zM

あと一つだけ、参照設定画面でライブラリの優先順位が正常なPCと同じかどうか見たほうがいいかも

430

： デフォルトの名無しさん [sage] 2019/01/11(金) 12:39:42.06

:1sVePy4G

>>428

多分、レジストリに登録されているActiveX情報を見に行っているだけで実際のdllは見に行っていないと思う。
dllを見に行くのはダイアログ上でチェックした時じゃないかな。

リストアップに問題があるとすればレジストリに問題があるとか。
でも単純にそのダイアログを表示するだけの所でこけている可能性もある。

WordとかAccessでも同じ状況なのかな?
他にOffice以外でActiveXのリストを表示できるアプリがあれば、そこでは問題無いかなど。

431

： デフォルトの名無しさん [sage] 2019/01/11(金) 13:24:28.67

:UHhRfKCF

>>429

>>430

有用な情報ありがとうございます！
ここら辺も重点的に調べてみます！！

432

： デフォルトの名無しさん [sage] 2019/01/11(金) 18:28:05.98

:s+JlNqnO

オフィスを少し古いバージョンにロールバックさせてみれば？
2010とか2003にしろって言ってるわけではなくて
2016のパッチの適用状態を最新から4世代くらい前に戻してみてはどうかって言う話ね

433

： デフォルトの名無しさん [] 2019/01/12(土) 11:49:00.24

:uvKv7UXV

まだエクセルωなんて使ってるのかωω

434

： デフォルトの名無しさん [sage] 2019/01/12(土) 12:31:34.63

:e9xF8Gpo

・客とのデータ交換フォーマットのデファクトスタンダード
・文字列、表、図形を混合したセマンティックレスな文書作成ツールとして優秀
・インストール監査がかからない

この条件を満たすツールは今のところエクセルしかないのでエクセルは必要
でもVBAの存在意義には正直なところ懐疑的かな

435

： デフォルトの名無しさん [] 2019/01/12(土) 12:35:57.04

:02ysTAL5

【奇跡のリンゴ】　オノ・ヨーコ「来るな殺される」
外部リンク

ttp://rio2016.5ch.net/test/read.cgi/beatles/1547022582/l50

436

： デフォルトの名無しさん [sage] 2019/01/12(土) 13:57:32.57

:Sk8d17OT

エクセルωって何？

437

： デフォルトの名無しさん [] 2019/01/12(土) 16:04:54.69

:+r4m8XcO

おちんちん

438

： デフォルトの名無しさん [sage] 2019/01/12(土) 20:42:36.47

:WuY9EGhJ

>>434

すごい早口で言ってそう

439

： デフォルトの名無しさん [sage] 2019/01/13(日) 00:05:22.07

:hjY5Ys6w

割り当てたショートカットキーが競合した際の優先順位ってどうなっているのでしょう。
複数ブックでマクロオプションが競合した場合は、先勝ちのような気がします。
OnKeyはそれよりも強い？
自ブックに割り当てたショートカットを優先させる手段はありますか？

440

： デフォルトの名無しさん [sage] 2019/01/13(日) 04:14:15.34

:WBvXKiKr

フォーカス順じゃないのか?

441

： デフォルトの名無しさん [sage] 2019/01/13(日) 06:56:01.77

:SAPxjsPr

>>440

えーと、同じキーアサインを持っているブック、A→Bの順に開いて、Bにフォーカスが当たっている状態で、Aのキー割付が反応しました。
先に読み込まれた方が居座るのかと、、
フォーカス順ってどういう状態？

442

： デフォルトの名無しさん [sage] 2019/01/13(日) 07:17:03.79

:m/N1o858

>>441

アクティブなブックかと思ってた

443

： デフォルトの名無しさん [sage] 2019/01/13(日) 07:37:12.12

:SAPxjsPr

>>442

そうだと嬉しいんだけど

444

： デフォルトの名無しさん [] 2019/01/13(日) 20:14:37.35

:9xnKbe6r

こんにちは

>>415

です。
更新の削除（ロールバック）も試してみたのですが改善しなくて結局もうお手上げ状態でした。
他のofficeアプリでも呼べなかったのでとりあえずドライブごとバックアップ取ってシステム入れ直すことにしました。
パスワードがないとか、アクティベーションができないとか、インストールしていたプログラムの原本がないとかどうなってんだよこの会社は程度には散々な目に合いました。
今どうにかこうにか復旧できて明日の業務には間に合いそうです。
ＩＤ・ＰＷを統合管理する何かを作らないとダメかも・・・
もうしんどいのでおうち帰りますＴ－Ｔ
アドバイスくださったかたどうもありがとうございました。
なんかおいしいものたべたい……

445

： デフォルトの名無しさん [sage] 2019/01/13(日) 22:13:52.77

:4kwCYp6o

お疲れ様としか言いようがない

446

： デフォルトの名無しさん [sage] 2019/01/13(日) 23:14:49.60

:W6yQzIWL

黴の生えた産廃に固執し先へ進む努力をしてこなかった人間と組織の末路

447

： デフォルトの名無しさん [sage] 2019/01/13(日) 23:49:20.57

:mzAlUYGr

かわいそうに
くだらないトラブルで連休が潰れるなんてな
最初から.NETにしてたらゆっくり休めたかもなぁ

448

： デフォルトの名無しさん [sage] 2019/01/13(日) 23:56:50.10

:LesaGnrm

会社がシステム更新の費用をケチって社員に残業や休出を強いるのはブラック判定丸です

449

： デフォルトの名無しさん [sage] 2019/01/14(月) 01:11:47.03

:HbfNSvAf

.netってvbaと比べて難易度高い？

450

： デフォルトの名無しさん [sage] 2019/01/14(月) 01:27:46.11

:p535EsUF

.NETは簡単すぎて驚くほど

451

： デフォルトの名無しさん [] 2019/01/14(月) 06:51:38.95

:ztoWl03f

じゃjavascriptってvbaと比べて難易度高い？

452

： デフォルトの名無しさん [sage] 2019/01/14(月) 09:16:46.39

:Kw7zClor

>>448

重度になると、ExcelをCalcに入れ替えられます。

453

： デフォルトの名無しさん [sage] 2019/01/14(月) 09:44:43.02

:p535EsUF

Calcのほうがマシでは？
機能面でも上だし無料でライセンスやインストールでのトラブルなどないからね

454

： デフォルトの名無しさん [sage] 2019/01/14(月) 09:53:44.76

:/nPFdxzS

>>451

VBA(というかVBシリーズ一般)ユーザーは他のものを覚えようとしないから未だにVBAユーザーなのだから、
VBAではないものは何であろうと極めて難しいよ

455

： デフォルトの名無しさん [sage] 2019/01/14(月) 10:04:01.93

:p535EsUF

高い金を払ってるのだから問題をサポートに投げなきゃ損だよ
連休を使って自力解決するぐらいなら最初から無料・サポート無しのOSSツールを使うのが正解

456

： デフォルトの名無しさん [sage] 2019/01/14(月) 10:21:32.96

:Gjhb4oYZ

Calc使ったこと無いだろ…
動作が安定しないしよくわからない独自仕様があるから困るわ
絶対パス使って別ファイルのデータを参照しにいったら、内部的に相対パスに変換されてるらしくて、
ファイルの位置を変えたらリンクを張り直さないと動かないとかだし

457

： デフォルトの名無しさん [sage] 2019/01/14(月) 10:27:00.01

:p535EsUF

エクセルだって
動作安定しない(ちょくちょく落ちる、ファイル壊れる、操作が失敗する)
へんな独自仕様の塊(そもそも表計算の標準仕様とは?)
ファイル移動したらリンク切れる(当たり前)

もしかしてなんか違うツールの話してる？

458

： デフォルトの名無しさん [] 2019/01/14(月) 10:49:16.77

:rhE9Hj5A

calcってwindowsの電卓のことじゃなかったのか？

459

： デフォルトの名無しさん [] 2019/01/14(月) 10:53:17.36

:rhE9Hj5A

プロのプログラマならショートカット使うから
Winキー + E + calc + ENTERキー
でいつも瞬時に電卓立ち上げてるからな
その間0.1秒

460

： デフォルトの名無しさん [sage] 2019/01/14(月) 11:22:28.62

:/xEWvTMC

電卓で計算してExcelに入力するおじさん見たことある

461

： デフォルトの名無しさん [sage] 2019/01/14(月) 11:55:28.16

:9Cudnq1q

無料の、Libre Office を使えば？

462

： デフォルトの名無しさん [] 2019/01/14(月) 12:42:47.66

:aPj/koI6

>>444

おまえが壊したんだろどうみても

463

： デフォルトの名無しさん [sage] 2019/01/14(月) 12:50:29.27

:w9DNi3U5

電卓ボタンがあるのに

464

： デフォルトの名無しさん [sage] 2019/01/14(月) 15:17:38.41

:frEC6XsU

>>462

典型的なステレオタイプ

465

： デフォルトの名無しさん [] 2019/01/14(月) 15:19:29.30

:kL0Onkfi

>>457

馬鹿は新しいものが良いものだと思ってるバージョンすぐ上げるからそうなる

466

： デフォルトの名無しさん [sage] 2019/01/14(月) 16:17:48.40

:p535EsUF

と思ってる人がセキュリティ事故や上の方でやらかしたようなトラブルにハマっっちゃうんだよな
何事も枯れてるほうがいいなんてのはとうの昔の話で、今は素早いアップデート(とテスト)が大切なんだよ

467

： デフォルトの名無しさん [] 2019/01/14(月) 17:26:03.90

:YUjplXjc

ID:p535EsUF

本日の死んだ方がいい大馬鹿

468

： デフォルトの名無しさん [] 2019/01/14(月) 17:36:28.59

:Kh7Ilxpb

でもVBAなんて未来ないじゃん
今から覚える意味ないのは間違いない

469

： デフォルトの名無しさん [sage] 2019/01/14(月) 19:11:25.88

:p535EsUF

ロジカルに意見できなくなって暴言を吐くしかできなくなった人ってたまに居るけどなんかかわいそう

470

： デフォルトの名無しさん [sage] 2019/01/14(月) 19:11:30.68

:6UwZJ038

未来は無くても現在はあるから

471

： デフォルトの名無しさん [sage] 2019/01/14(月) 19:15:17.29

:p535EsUF

過去の負債は沢山ありそうだ

472

： デフォルトの名無しさん [sage] 2019/01/14(月) 19:21:43.79

:qRVrYCla

いい加減、マクロの実行だけはできるけどVBEは別途開発者ライセンスの購入が必要、くらいの弾圧はしていいと思う
さすがにいつまでも甘やかしすぎ

473

： デフォルトの名無しさん [sage] 2019/01/14(月) 19:23:33.71

:Kw7zClor

>>460

意外と普通にいるんだわ。

474

： デフォルトの名無しさん [sage] 2019/01/14(月) 20:35:40.54

:Cz3RFHYj

ろくに組めない奴がマウント取りたがってる構図だな。

実際、俺の回りにいるできる奴はVBAを駄目だとか言う奴はいない。

475

： デフォルトの名無しさん [sage] 2019/01/14(月) 20:43:07.10

:qRVrYCla

>>474

実際、できる奴なら必ず他の選択肢を持っているからね
VBAに縛られていないから悪く言う必要もないだけであり、彼らが積極的にVBAを選択することはないよ

476

： デフォルトの名無しさん [sage] 2019/01/14(月) 20:51:06.32

:Cz3RFHYj

>>475

まあ、できる奴はC#も使わんけどね。
C++使うわな。

477

： デフォルトの名無しさん [sage] 2019/01/14(月) 21:02:23.95

:qRVrYCla

>>476

無意味な拘りで3倍の工数をかける奴は「できる奴」とは言わない
ただの迷惑で無能なオタクだな

478

： デフォルトの名無しさん [sage] 2019/01/14(月) 21:57:12.74

:fMQSLe21

C#やC++のスレでは自慢できないからここでマウントしたがる…というわけですね

479

： デフォルトの名無しさん [sage] 2019/01/14(月) 22:21:10.88

:HbfNSvAf

vbaのいいところってエクセル持ってれば無料で使えて大体のクライアントpcにエクセル入ってるって事なんだからあんまりあーでもないこーでもない言ってやるなよ

480

： デフォルトの名無しさん [] 2019/01/14(月) 22:26:43.78

:HmGTNO3E

エクセルのＶＢＡってシート＝変数の一覧みたいなものだし
素人にはやりやすいだからエクセルは好きですよ。
そんな感じでプロの人と棲み分けできていると思う。

481

： デフォルトの名無しさん [sage] 2019/01/14(月) 22:26:54.46

:87eYPPUj

Officeが入ってなくてもWindowsパソコンには必ず入ってるJavaScriptやC#の立場は

482

： デフォルトの名無しさん [] 2019/01/14(月) 22:34:56.07

:HmGTNO3E

JavaScriptっていますごく人気あるんじゃないの？

483

： デフォルトの名無しさん [sage] 2019/01/14(月) 23:07:34.41

:Cz3RFHYj

結局、出来ない奴ってのはオラが世界だけなんだよな。

C#なんて出来ないこといっぱいあるのに工数とかいって言い訳するんだよ。
なんであんな遅くて出来ないこといっぱいのクソ言語使うのかねえ。

なんて言われた時の反論がバカにしてるVBAと同レベルの反論をするんだよな。

まともな奴ならそういう都合が分かってるからマウントなんて取らないものなんだが。

484

： デフォルトの名無しさん [] 2019/01/14(月) 23:28:28.98

:HmGTNO3E

>>483

あなたのいう出来る出来ないっていうのは何を指しているのかは解りませんが私にとっては何の価値も意味もないです。
それともあなたは自分が出来る奴っていう自慢をしたいんですか？
あなたが本当に凄いならあなたのいう下らないレベルの言語のスレではなく、もっと凄い人が沢山いるスレが相応しいと思います。

485

： デフォルトの名無しさん [sage] 2019/01/14(月) 23:36:15.26

:6n/s2HAk

>>476

キミ面白いね

486

： デフォルトの名無しさん [] 2019/01/15(火) 01:46:38.96

:yHGEgwFF

>>466

働いたこともない無職か

487

： デフォルトの名無しさん [sage] 2019/01/15(火) 08:47:01.01

:2H7V8WUe

>>484

出来る奴ってのはどんな言語にもいるけど言語の優劣を語るような奴は出来ない奴の典型。

C#の方が...などと言う奴の言ってることってのは突き詰めると「プログラマーなんて底辺」なんてのと一緒なんだよ。

そんなことも分からないからマウント取ろうと頑張るんだね。
自分のバカさ加減を喧伝するようなもんだ。

488

： デフォルトの名無しさん [] 2019/01/15(火) 09:14:01.41

:S3yO0kW1

>>487

自己紹介乙

489

： デフォルトの名無しさん [sage] 2019/01/15(火) 13:10:33.30

:4ICOKV5/

相手するなよ…

490

： デフォルトの名無しさん [] 2019/01/15(火) 15:44:09.85

:+MTMyzJj

アプデしたらExcelうごかんくなった
たすけてえろいひと

491

： デフォルトの名無しさん [sage] 2019/01/15(火) 17:14:50.09

:bs6RyUw7

まず服を服を脱ぎます

492

： デフォルトの名無しさん [] 2019/01/15(火) 17:49:29.10

:yHGEgwFF

>>490

ID:p535EsUFに聞け

493

： デフォルトの名無しさん [sage] 2019/01/15(火) 17:53:44.09

:LAAyKIEn

>>487

できる奴ほど言語のメリットデメリットを正確に理解してるから優劣を語る
出来ない人はそもそも語るほどの知識がない

494

： デフォルトの名無しさん [sage] 2019/01/15(火) 20:59:40.68

:2H7V8WUe

>>493

メリット、デメリットを把握してたら優劣つかないんだが。

そうだな、このスレで何度となく言われてることだが、Excelのみで完結できるというメリットを挙げると、別ファイルが有っても大きな問題じゃないとかくだらない言い訳を始めるんだよ。
今まで、どんな場合でもVBAは駄目とか言ってたくせに。

495

： デフォルトの名無しさん [sage] 2019/01/15(火) 21:49:29.77

:LAAyKIEn

もうそれしか拠り所がない感じなのかな

496

： デフォルトの名無しさん [sage] 2019/01/15(火) 23:55:27.89

:7/bomr1d

出たな単一ファイル老人

497

： デフォルトの名無しさん [sage] 2019/01/16(水) 12:53:07.07

:dguj1mvw

どんな場合でもと言ってたのが破綻したわけだ。
それに、この点は全てに係る重要な点だ。

他にも沢山あっただろ。
でもこれ1つで「どんな場合でも」は破綻したな。

498

： デフォルトの名無しさん [sage] 2019/01/17(木) 10:25:15.47

:yJSDrWu9

そもそも職場でexcelしか許可されてなくてほかのソフトが入れられない人にとって
ほかの言語がどれだけメリットがあっても使わせてもらえなければどうしようもないんじゃね
俺はVBA以外も多少知っているけどそっちの話は別のスレでやってる

499

： デフォルトの名無しさん [sage] 2019/01/17(木) 11:51:25.20

:a+HEJ0Au

本当に必要なら申請すれば入れさせてもらえるはずとか言ってもねぇ
VBAでは絶対無理ってわけでもなく、出来ないこともないので、
本当に必要かって言われるとそうではないことも多いからなぁ

500

： デフォルトの名無しさん [sage] 2019/01/17(木) 12:21:24.46

:oU9OMPiG

C#やPowershellも含めて使えないってことは滅多にないだろ
そういう特殊環境を前提に語るべきではない

501

： デフォルトの名無しさん [sage] 2019/01/17(木) 12:56:14.54

:JYUOuN3I

仕事ではその特殊環境となる場合が結構あるんだが。
VBA禁止って所もある。

けどこのスレはVBAが前提なんでね。
C#やPowerShell禁止はデメリットになるけどVBA禁止はデメリットにならないという前提を理解出来ない奴は結構来るけど。

502

： デフォルトの名無しさん [] 2019/01/17(木) 13:09:47.45

:gy8QMGRk

VBA禁止の本当の意味は、
馬鹿が作ったVBA禁止

503

： デフォルトの名無しさん [sage] 2019/01/17(木) 13:42:50.54

:K8cT5dis

IEをオブジェクトにしてフォームに入力、実行まではできます。
実行後、更新されたHTMLを取得するにはどうすればよいのでしょうか？

504

： デフォルトの名無しさん [] 2019/01/17(木) 13:45:27.52

:Vm2XnGVD

>>498

わかるわ。うちもシンクライアントでガチガチにＯＳ固められてるから必然的にVBAとJavascript覚えた。

505

： デフォルトの名無しさん [sage] 2019/01/17(木) 14:38:35.71

:m9vUe5gc

>>503

VBAでやることではありません
RPAでも購入してください

506

： デフォルトの名無しさん [sage] 2019/01/17(木) 16:39:21.64

:yJSDrWu9

>>500

C#やPowershell のスレでやるべきである

507

： デフォルトの名無しさん [] 2019/01/17(木) 16:39:45.91

:Vm2XnGVD

>>503

objIE.Document.Body.innerHTML で読めないの？

508

： デフォルトの名無しさん [] 2019/01/17(木) 16:44:36.37

:YCcy3q+Y

>>500

ここはVBAのスレ。文字読めないヴァカ？
C#やPowershell自慢やりたいんならそのスレに逝けアホンダラ

509

： デフォルトの名無しさん [] 2019/01/17(木) 16:47:10.66

:6nl0xXGy

>>508

何で自慢になるんだ？
馬鹿なのか？

510

： デフォルトの名無しさん [] 2019/01/17(木) 17:43:02.84

:8rj4oJ0j

馬鹿には無理

511

： デフォルトの名無しさん [sage] 2019/01/17(木) 18:08:51.74

:yJSDrWu9

自慢じゃなくて荒らしだな

512

： デフォルトの名無しさん [sage] 2019/01/17(木) 19:42:56.03

:buYHz7fQ

>>503

普通は、Ruby, Selenium WebDriver, Nokogiri で、スクレイピングするけど、

ピラフ大王は、5ch のスレを、PowerShell でスクレイピングしていた、強者！

513

： デフォルトの名無しさん [] 2019/01/17(木) 19:57:04.61

:Vm2XnGVD

>>512

あ、俺Seleniumでスクレイピングしてるわ
ＩＥ面倒なんだもんｗ

514

： デフォルトの名無しさん [sage] 2019/01/17(木) 20:39:11.18

:JYUOuN3I

IEオブジェクトはHTMLコード内の改行も1つのノードとして扱ってる点が特殊だな。
MSXML2.XMLHTTPとかhtmlfileでやる場合はそんなこと無いけど。

515

： デフォルトの名無しさん [sage] 2019/01/17(木) 20:51:55.46

:/w6CmWBz

スクレイピングをわざわざVBAでやろうという発想がどこから出てくるのか不思議だな
個人なら裁量があるのにあえてVBAを使う選択はありえないし、
会社だとするとスクレイピングをやろうと考える程度にリテラシーがありコンプライアンス意識が低く、
かつ他のツールを使えない程度には厳格なちゃんとした企業なのにRPAを買う金はない?

516

： デフォルトの名無しさん [sage] 2019/01/17(木) 21:30:07.38

:Vm2XnGVD

>>515

どうしてって、うーん、ただPCにOFFICEが入ってたから使ってるw
javascriptもPerlとかも無料だし、大体どこでも使えるし何か買うほどやる気ないし……
あなたの思っていることは理にかなっていると思うよ、多分色々なことを知っててそれが出来れば視野も広がるって親切心なんだろう。
でも、なんつーか個人で使うだけだから脱線しててもやりたいことが短時間で出来ればいいっていう視点もまぁ理解して欲しい。困ったら聞くかもしんないけどお手柔らかに頼みますw
あとありがとう。

517

： デフォルトの名無しさん [sage] 2019/01/17(木) 21:48:09.40

:3qXsUeDf

IEが消えりゃVBAでスクレイピングなんてのも消えるし
そう遠い未来じゃない

518

： デフォルトの名無しさん [sage] 2019/01/17(木) 23:47:45.37

:1381LMvg

>>499

俺もそんな理由でVBS使ってるわ。
本当は専用の開発ソフト欲しいけど、
やろうと思えばメモ帳だけで出来なくもない、ってのが曲者。

519

： デフォルトの名無しさん [sage] 2019/01/18(金) 00:09:50.30

:3Aai6ayN

うーんどうやら開発ツールを申請できない／入れてもらえない会社が無視できないくらい存在する、
というのはデタラメじゃなかったんだな

520

： デフォルトの名無しさん [sage] 2019/01/18(金) 00:58:32.59

:ld1N2+LD

無視できないくらいってどのくらいだよｗ

521

： デフォルトの名無しさん [] 2019/01/18(金) 04:56:39.52

:iqHxmsyd

馬鹿には入れさせないだけ

522

： デフォルトの名無しさん [sage] 2019/01/18(金) 08:20:26.64

:FdTpqa5z

>>515

別にわざわざでは無いけどね。
一瞬で出来るんだわ。
それ用のツールを昔、作ったんでね。

>>519

それは仕事の規模によるだろ。
それに、こっちも入れる迄もないと思ってるから申請なぞせんぞ。
VBAだとどうにもならない仕事が継続的に続くなら申請するんだろうが。

523

： デフォルトの名無しさん [sage] 2019/01/18(金) 08:59:50.59

:HmTdANXo

まずOS標準のPowershellでできることをやる
規模が大きくなって型安全性などが欲しくなったら.net CLIとVSCodeを入れる
VBAは本当にVBAが必要で他に選択肢がない場合にしょうがなく使う

524

： デフォルトの名無しさん [sage] 2019/01/18(金) 09:13:15.26

:FdTpqa5z

なんでExcel標準のVBAを使わないのかねw
バカじゃないの?

525

： デフォルトの名無しさん [sage] 2019/01/18(金) 09:58:22.02

:Xg90leRQ

VBAは公式には「レガシー」で「非推奨」な機能だよ

526

： デフォルトの名無しさん [sage] 2019/01/18(金) 10:27:15.84

:02H4sO2V

うちは無料ならツール申請すれば通常通るし、理由もそんなに掘り下げて詮索されることはない。
有料だととたんにハードルが上がるけど。
んでVisual Studioやらなんやら入れた後もVBAはがんがん使ってるな。
C++/C#と比較してもアドバンテージはあると思うよ。
ちなみにPowershellは起動できないようになってる。権限の問題だから単なるインストール申請よりハードル上がるとおもう。

527

： デフォルトの名無しさん [sage] 2019/01/18(金) 12:01:36.56

:dGgLcYHd

>>526

C# を禁止せずに PowerShell 禁止とか意味わからん
まあよくわかってない情シスとかが決めてたりするんだろうな

528

： デフォルトの名無しさん [sage] 2019/01/18(金) 12:06:44.97

:Xg90leRQ

>>527

そりゃ情シスなんかちょっとだけ意識高いPCユーザーに過ぎないんだから、その辺の層の人にとってexeは怖いでしょ
PowerShellなんか所詮テキストファイルだから安心

529

： デフォルトの名無しさん [sage] 2019/01/18(金) 12:54:22.16

:FdTpqa5z

PowerShellはデフォルトで実行出来ないでしょ。
で、実行できるようにして良いかが問題となる。

530

： デフォルトの名無しさん [sage] 2019/01/18(金) 13:32:03.41

:ld1N2+LD

うちは共有pcだと社員の個人情報とか社外秘のデータも扱っているから
情報漏洩やコンプライアンスはうるさいんだよね
そういうの適当な会社がうらやましいよ

531

： デフォルトの名無しさん [sage] 2019/01/18(金) 13:46:56.62

:dGgLcYHd

>>528

？？？
禁止してるのはテキストファイル（PowerShell）の方だよ？

532

： デフォルトの名無しさん [sage] 2019/01/18(金) 13:52:14.57

:dGgLcYHd

>>529

> PowerShellはデフォルトで実行出来ないでしょ。
できるよ
powershell -ExecutionPolicy RemoteSigned xxxx.ps1
ってやるだけ

533

： デフォルトの名無しさん [sage] 2019/01/18(金) 15:05:03.66

:u9bkOu0s

PowerShellデフォルトでスクリプト実行できないのは致命的。
「え？デフォルトからセキュリティ弛めるの？大丈夫なの？」ってなる。

534

： デフォルトの名無しさん [sage] 2019/01/18(金) 15:58:31.39

:N2j3ka14

>>533

>>532

535

： デフォルトの名無しさん [sage] 2019/01/18(金) 18:10:43.98

:u9bkOu0s

>>534

ウザっ

536

： デフォルトの名無しさん [sage] 2019/01/18(金) 18:21:14.18

:FdTpqa5z

>>532

それをどこでやるの?
当然ダブルクリック1発でできるんだよね。

もしかしてそのためにバッチファイルも作るとか言わんよな。

537

： デフォルトの名無しさん [sage] 2019/01/18(金) 18:36:02.88

:dGgLcYHd

>>536

やれる/やれないの話な
後出しでダブルクリックガーとか恥ずかしすぎるだろ w
ちなみに若干トリッキーだがバッチファイルにPowerShellのソースを入れちゃうこともできる

538

： デフォルトの名無しさん [sage] 2019/01/18(金) 19:50:38.17

:BPWAMvDw

ExecutionPolicyはCurrentUserスコープなら権限不要で変更可能
陽
この情報はプロならみんな知ってるけどアマチュアは知らない人が多いね

539

： デフォルトの名無しさん [sage] 2019/01/18(金) 20:36:05.00

:3Aai6ayN

実行の話じゃないでしょ

540

： デフォルトの名無しさん [sage] 2019/01/18(金) 20:43:46.91

:FdTpqa5z

>>537

???
今まで何の話をしてたんだ?
PowerShellの方がVBAより有利だと言いたかったんじゃないの?

君の発言を聞いてるとPowerShellはますます使いものにならないように感じるんだが、もしかして君は実はVBAの方が有利だと言いたかったのか?

541

： デフォルトの名無しさん [sage] 2019/01/18(金) 21:06:07.91

:dGgLcYHd

>>540

> 今まで何の話をしてたんだ?

>>529

> PowerShellはデフォルトで実行出来ないでしょ。
とか言う情弱がいたって話 w

542

： デフォルトの名無しさん [sage] 2019/01/18(金) 21:45:43.94

:WMbv0rpV

あれ？ ExcelってVBAをデフォルトで実行できたっけ？

543

： デフォルトの名無しさん [sage] 2019/01/18(金) 22:19:33.59

:dGgLcYHd

>>542

まあ設定いるんだけど管理者権限は要らない
PowerShell も

>>538

が言うように管理者権限不要だけど

>>529

はSet-ExecutionPolicyの-scopeを知らなかったんだろうな

544

： デフォルトの名無しさん [sage] 2019/01/18(金) 23:37:19.13

:c34mocfv

設定を変えなければ動かないことをデフォルトでは動かないというんじゃないかね
設定を変えるのが簡単かどうかは別問題だろ

545

： デフォルトの名無しさん [sage] 2019/01/18(金) 23:49:44.04

:LGpZNaP9

右クリックするだけだろ

546

： デフォルトの名無しさん [sage] 2019/01/19(土) 00:13:36.27

:Fjsb0QYM

既定では
右クリック→管理者として実行
右クリック→やWindowsPowerShellで実行

いずれも.ps1スクリプトは実行できない

>>543

もまちがい
既定状態のPCでも
powershell -executionpolicy remotesigned -file 'hoge.ps1'
などと打てば自動的にプロセススコープで自作のスクリプトなどを実行可能

547

： デフォルトの名無しさん [sage] 2019/01/19(土) 02:49:20.82

:S0ghMGDC

PowerShell -Part 3
外部リンク

ttps://mevius.5ch.net/test/read.cgi/tech/1539074808/

548

： デフォルトの名無しさん [sage] 2019/01/19(土) 05:10:03.36

:+IqL7b8U

>>544

だからそんなこと言い出したらVBAだってディフォルトでは動かないって話
逆にPowerShellはオプションつければ設定変更なしに実行可能
要するに

が情弱っていう事実は変わらない

もまちがい
話の流れを読めよ…
既に

に書いてあることでドヤ顔されても困る w

： デフォルトの名無しさん [sage] 2019/01/19(土) 06:27:03.00

:wkXfpZQC

VBAってデフォルトでは動かないんだっけ？
マクロ入りファイルを開く時は許可か設定が必要だけど、新規ブックならいきなり使えたような
再インストールして確認するのは面倒だからうろ覚えだけど

550

： デフォルトの名無しさん [sage] 2019/01/19(土) 07:08:08.04

:fPDnzLoP

VBAはそもそもオフィスのインストールという過酷な作業が必要だからな
アマチュアの事務員さんは用意されたパソコンを使うだけだから知らないのかもしれないがな
プロはプロジェクトのたびに全員のパソコンを誰かが準備しなきゃならんのよ
オフィスのインストール作業は地味にでかい工数になるんだ

551

： デフォルトの名無しさん [sage] 2019/01/19(土) 08:17:46.72

:pNQS4Xn+

デフォルトで信頼されてる場所のファイルでも動かなかったっけ？

大昔のエクセルならデフォルトでどこでもマクロ動いてたけどなｗ

552

： デフォルトの名無しさん [sage] 2019/01/19(土) 10:55:07.59

:gJfblIQ2

実行するファイルとは別に呼び出す仕組みを用意する必要があるからpowershellがクソだって言われてるのが分からないのか？
頭悪すぎない？

553

： デフォルトの名無しさん [sage] 2019/01/19(土) 11:03:22.61

:Fjsb0QYM

実行スコープを細かく規定出来るのは進歩。クソだとのたまうアホはセキュリティ意識がおかしい

554

： デフォルトの名無しさん [sage] 2019/01/19(土) 11:07:55.26

:OmtBIHUo

右クリックするだけだろ

555

： デフォルトの名無しさん [sage] 2019/01/19(土) 11:12:21.71

:gJfblIQ2

そのスコープを組み込めない時点で終わってるという話をしているんですよ？

556

： デフォルトの名無しさん [sage] 2019/01/19(土) 11:39:33.19

:fPDnzLoP

スコープを組み込む

この言葉の意味がよくわからんので詳しく説明してみて

557

： デフォルトの名無しさん [sage] 2019/01/19(土) 11:47:23.37

:fPDnzLoP

vbaもエクセルファイル自体が実行可能な訳じゃなくエクセルというプログラムが解釈してやってるだけ
なのでvbaも別に呼び出す仕組みが必要と言っていい
その仕組みは膨大なインストール時間とライセンス料金を支払ってオフィスをインストールするという苦行を乗り越えないと利用できない

それに比べたらパワーシェルは実行までの手間は殆ど無視できるほど小さい
シェルでたったの1行コマンドレットを打つだけでOK
しかも無料なので嬉しいね

558

： デフォルトの名無しさん [sage] 2019/01/19(土) 11:47:30.68

:gJfblIQ2

OSのデフォルト状態で出来ることが前提
拡張子が.ps1の場合右クリックのメニューにremotesingedを表示させるとか？

559

： デフォルトの名無しさん [sage] 2019/01/19(土) 11:51:02.97

:8CGfSDeG

もうその話はpowershellのスレに移動してやってください

560

： デフォルトの名無しさん [sage] 2019/01/19(土) 11:51:52.41

:1cEunHBW

>>552

> 実行するファイルとは別に呼び出す仕組みを用意する必要がある
はあ？
情弱自慢かよww

561

： デフォルトの名無しさん [sage] 2019/01/19(土) 12:11:34.94

:lm8WiCyM

現実社会では話ができない寂しい「プロ」」のプログラマどもが何やらくだらん
雑談をしてスレを潰してるけど質問者の皆さんはそんなヨタ話に付き合う必要
はありませんので、遠慮なく質問をどぞ～

562

： デフォルトの名無しさん [] 2019/01/19(土) 12:14:32.41

:oaSrkPrl

ところでホンマにブロなん？プロさんて？なんかあやしいんですけどw

563

： デフォルトの名無しさん [sage] 2019/01/19(土) 12:25:03.26

:4FsWRGgY

Officeインストールするしないがオプションなんて事業所あるの？

564

： デフォルトの名無しさん [sage] 2019/01/19(土) 12:40:58.29

:wkXfpZQC

厳密な定義や資格があるわけじゃないんで「プロ」を名乗るのは自由です

565

： デフォルトの名無しさん [sage] 2019/01/19(土) 13:14:50.16

:fPDnzLoP

>>563

そりゃもちろんあるよ
禁止してる事業所だってある
そもそもOS違いで使えないこともある

566

： デフォルトの名無しさん [sage] 2019/01/19(土) 13:21:53.40

:+IqL7b8U

>>563

うちの会社は開発専用機にはインストールしないけどそういう機器は自分でセットアップするからなぁ

>>550

の言うプロジェクトの度に準備とかはよくわからんな

567

： デフォルトの名無しさん [sage] 2019/01/19(土) 13:26:53.56

:4FsWRGgY

CADなんかの専用ソフトしか動かさんとか開発機とかそういうのならわかるけど、
このスレで話題にする以上関係ないというか対象外でしょ

568

： デフォルトの名無しさん [sage] 2019/01/19(土) 13:35:07.44

:Fjsb0QYM

普通はイメージで展開して、個別はライセンス認証だけっしょ一台数分

569

： デフォルトの名無しさん [] 2019/01/19(土) 14:06:33.45

:/+FUwnIm

>>558

へえ、ExcelってOSのデフォルト状態で使えるんだ？

570

： デフォルトの名無しさん [] 2019/01/19(土) 14:46:59.67

:Qiw5pxsO

WSHだろ常考

571

： デフォルトの名無しさん [sage] 2019/01/19(土) 15:22:25.47

:wiNfQeeu

>>523-537

例えば、クリップボードでも、Ruby から、powershell コマンドを呼ぶ。
a.rb

str = `powershell Get-Clipboard`
str.encode! Encoding::UTF_8, Encoding::CP932 # UTF_8 へ変換

これをダブルクリックで起動したいのなら、バッチかVBS で起動する。
a.bat

ruby .\a.rb

テキスト処理は、VSCode, Rubyで十分！

572

： デフォルトの名無しさん [sage] 2019/01/19(土) 15:49:39.46

:BW5TF7JU

>>571

VSCodeは個別にライセンスのある膨大な数のオープンソースソフトウェアの塊であり、
PowerShellを禁止しているような糞組織のPCにインストールすることは不可能
RubyもライセンスにGPLの文字を見つけた途端に情シスが卒倒するレベルで全くもって論外

573

： デフォルトの名無しさん [] 2019/01/19(土) 21:28:25.59

:AuMD8hxP

プロさんてバカしかおらんの？

574

： デフォルトの名無しさん [sage] 2019/01/19(土) 21:35:07.05

:+IqL7b8U

所詮自称プロだしw

575

： デフォルトの名無しさん [] 2019/01/19(土) 21:40:37.46

:AuMD8hxP

>>574

開きなおるなバカ

576

： デフォルトの名無しさん [sage] 2019/01/19(土) 22:05:47.19

:+IqL7b8U

>>575

開き直り？
嘲笑って意味わかる？ w

577

： デフォルトの名無しさん [sage] 2019/01/19(土) 22:06:05.61

:ARTGttMK

excelってVBAからpythonに変わるっていってなかったっけ？

578

： ◆QZaw55cn4c [sage] 2019/01/19(土) 22:08:25.92

:KpXpzNLK

>>577

いってるだけ、今のところは

579

： デフォルトの名無しさん [sage] 2019/01/20(日) 00:48:58.52

:QFn18v7i

dictionaryに格納してるItemを検索して、存在してればKeyを返却する方法が知りたいのだけど、ループさせてヒットしたら値を出す方法以外でfind的な一発でポンと返す記述の仕方はない？

580

： ◆QZaw55cn4c [sage] 2019/01/20(日) 01:04:30.85

:yiNhGfDQ

>>579

Item 間に順序関係があればそれを利用して二分探索を適用できる、無論、記述はループチェックに比べて量が多くなる

581

： デフォルトの名無しさん [sage] 2019/01/20(日) 03:54:11.74

:IAu7YphR

>>579

一行で書きたいということなら、文字列ならワークシート関数Matchで検索できます。
ただ存在しなかった場合はエラーが返るので例外処理か事前に調べておく必要があります。

例）
Dim map As Dictionary
Set map = New Dictionary
map.Add "みかん", "橙"
map.Add "りんご", "赤"
map.Add "さくらんぼ", "赤"
map.Add "ぶどう", "紫"

On Error Resume Next

Debug.Print map.Keys(WorksheetFunction.Match("赤", map.Items, 0) - 1)
'りんご
Debug.Print map.Keys(WorksheetFunction.Match("白", map.Items, 0) - 1)
'エラー

On Error GoTo 0

個人的には普通に関数作った方が使いやすいと思います。

582

： デフォルトの名無しさん [sage] 2019/01/20(日) 08:04:01.23

:cWi8furK

>>439

Excel.Application.Onkey で最優先ショートカットキーにできる
次いで.macroOptionsの古いほうが動くよ

583

： デフォルトの名無しさん [sage] 2019/01/20(日) 08:25:03.17

:KJwN8fo6

配列とかコレクションに対してSQLが使えればいいんだけどな。
matchやvlookupより速いんだけど、いちいちシートとかcsvに書き出さなきゃならん。

584

： デフォルトの名無しさん [sage] 2019/01/20(日) 09:17:44.39

:OfXqqqKI

そこまで行くとAccessのお仕事を食っちまう

585

： デフォルトの名無しさん [sage] 2019/01/20(日) 09:22:18.21

:1t0h4eLG

Access VBAでやればいいじゃん

586

： デフォルトの名無しさん [sage] 2019/01/20(日) 09:32:11.24

:brNktcWU

>>582

おっと、回答いただけるとは。
onkeyだと、activeworkbookだろうが、thisworkbookだろうが、後定義したほうが上書き、後勝ちしません？
active側に定義されたショートカットがそれぞれ反応してくれると嬉しいのですが。

587

： デフォルトの名無しさん [sage] 2019/01/20(日) 10:54:01.49

:mVpLWWyp

>>583

MSにExcelでC#使えるようにしてくれ～
って要望をガンガン出せばお前の望みが叶うかも知れない

588

： デフォルトの名無しさん [sage] 2019/01/20(日) 13:02:37.66

:QFn18v7i

>>580

,581
ありがとう
Itemには順序関係ないから二分探索は出きなさそう
worksheet関数は完全に意識無かったので見た瞬間にあぁ！その手があったか！と目からウロコでした

589

： デフォルトの名無しさん [sage] 2019/01/20(日) 13:13:34.11

:k7Xn9dKz

C#スクリプトってOSSで軌道に乗っちゃってるからExcelの処理系として採用されることはないと思うぞ
同じものをClosedで再発明するってのも馬鹿馬鹿しいしな

強力な言語を使いたいならその言語を主としてExcelをコントロールすればいい
それで十分だ
わざわざExcelに乗っける必要性は薄い

590

： デフォルトの名無しさん [sage] 2019/01/20(日) 13:31:13.08

:mVpLWWyp

再発明とか意味わからん w

591

： デフォルトの名無しさん [] 2019/01/20(日) 16:43:57.95

:tNp2z70l

この場合の再発明と言われれば車輪の再発明を連想出来ないのはかなり緩いんだろう

592

： デフォルトの名無しさん [sage] 2019/01/20(日) 17:26:38.62

:GHMQXw/N

文脈的には再発明と言うより再実装かな

593

： デフォルトの名無しさん [sage] 2019/01/20(日) 17:32:05.81

:mVpLWWyp

いや、車輪の再発明はいいとして何を再発明するんだよって話
C#処理系のソースライセンス見てないけどMSが自社製品に使えなくなるようなライセンスにはなってないだろうし（なってたらVisual Studioの有償版とか売れなくなる）
普通にExcelに組み入れるだけだろ

594

： デフォルトの名無しさん [sage] 2019/01/20(日) 17:45:17.54

:TQeakhfS

>>593

メンテナンスのコストを甘く見すぎ
Excelに入れるなら最低でも以後10年は完全な互換性を維持し続けなきゃいけないわけ
今メインストリームのC#環境を入れるなら.NET Coreを組み込むことになるだろうけど、
.NET Coreって完全なサイドバイサイドを前提にガンガン破壊的変更をぶっ込んでいくスタイルだから、
Excelのバージョンアップのときに単純に.NET Coreのバージョンを上げるわけにはいかなくて、
Excel専用のブランチを作って継続的にメンテしていかざるを得ないの
それは実質的には新たに.NETの兄弟分を作って独立して育てていくことに他ならず、多大なメンテナンスコストを生じる上、
.NET エコシステムの分断を生むことになる
そんな馬鹿げたことをするくらいなら普通に.NET Coreを直接使わせた方が遥かにマシだろう

595

： デフォルトの名無しさん [sage] 2019/01/20(日) 17:59:54.91

:mVpLWWyp

>>594

> Excelに入れるなら最低でも以後10年は完全な互換性を維持し続けなきゃいけないわけ
それVBAの開発担当者にも言ってくれよ w

596

： デフォルトの名無しさん [sage] 2019/01/20(日) 18:07:02.56

:TQeakhfS

>>595

煽りはいいから直近10年でVBAに対して行われた破壊的変更を具体的に挙げてくれよ
当たり前だが不具合の話はしてないぞ？

597

： デフォルトの名無しさん [sage] 2019/01/20(日) 18:28:52.57

:mVpLWWyp

>>596

いや破壊的かどうかは別にしてもVBAも色々機能追加とかされてるだろ
VBAの機能追加をやめてそのリソースをC# for Officeに割くだけだよ
そもそもMac版はともかくWindows版のOfficeなら.NET Coreじゃなくて.NET Framework上に構築するだろうしな

598

： デフォルトの名無しさん [] 2019/01/20(日) 18:31:24.08

:wKV5+GB/

みっともないからいいかげん止めや似非プロさんの一人語り
そもそも出鱈目やってバレバレのプロ風の話して誰に対してマウント取りたいねんw

599

： デフォルトの名無しさん [sage] 2019/01/20(日) 18:46:13.28

:TQeakhfS

>>597

Full .NET はメンテナンスモードに入ったよ
4.8を最後に、今後大きな機能追加はない
残念ながら、今入れても新たに時代遅れのゴミが増えるだけだ

600

： デフォルトの名無しさん [sage] 2019/01/20(日) 20:02:31.83

:mVpLWWyp

>>599

逆に都合がいいじゃん
.NETFrameworkは簡単に廃止できないから君が大事にしてる互換性も保ちやすいしね

601

： デフォルトの名無しさん [sage] 2019/01/20(日) 22:44:30.32

:aU4dkoPo

A4用紙に上から4件ずつ異なるデータを入力して、
印刷したいのですが、どうすればいいか教えて下さい。
データ数は日によって異なり、30件～50件程度あります。
1ページ目に1～4、2ページ目に5～8・・・という感じです。
うまく説明出来なくてすいません。
4つデータを入力して印刷したら次、っていう感じの
ループ処理のコードのサンプルなどありましたら教えてください。

602

： デフォルトの名無しさん [sage] 2019/01/20(日) 22:48:25.28

:GTDVzsz1

>>601

改ページを設定すればいいだけじゃね？
外部リンク

ttp://https://kosapi.com/post-3244/

603

： デフォルトの名無しさん [sage] 2019/01/20(日) 22:55:12.40

:aU4dkoPo

>>602

ありがとうございます。

604

： デフォルトの名無しさん [sage] 2019/01/21(月) 09:00:45.75

:MgnF8xe3

このループw
他言語を推奨してる奴らには馬鹿しかいない。

ExcelVBAのスレなんだからExcelが動いてるのが大前提なんだよ。
そこへノコノコ乗り込んで来てOfficeインスト―ルとか言ってる馬鹿は滑稽。

テキスト処理とかもアホ丸出し。
Excel関係無いなら、そもそもVBAでやる必要全く無い。
そして全くのスレ違い。

605

： デフォルトの名無しさん [sage] 2019/01/21(月) 09:04:27.40

:MgnF8xe3

その後のC#やPythonを組み込んでくれって話はどうでもいい。
入って来たらそれで組むだけだ。

606

： デフォルトの名無しさん [sage] 2019/01/21(月) 10:06:31.18

:NbFzEAOW

終わった話にノコノコ乗り込んでくるウスノロかよww

607

： デフォルトの名無しさん [sage] 2019/01/21(月) 12:17:14.05

:HulQp10o

言われてみればVBAの破壊的仕様変更ってまったく無いよな。
オブジェクトを省略してて挙動が変わったくらいならあるけど。

64bit対応くらいじゃ無いか？

608

： デフォルトの名無しさん [sage] 2019/01/21(月) 16:29:48.24

:0Hj4ohcs

LongPtr型とPtrSafe宣言くらいか

609

： デフォルトの名無しさん [sage] 2019/01/21(月) 20:06:20.50

:mtdQDW0I

>>607

ただパッチいれたら動かなくなったことはあった

610

： デフォルトの名無しさん [sage] 2019/01/21(月) 20:57:18.88

:MgnF8xe3

2007の時、グラフ周りが軒並み動かなくなったことはあったな。

611

： デフォルトの名無しさん [sage] 2019/01/21(月) 22:36:48.74

:+ZXh/xZN

改ページ位置の誤検出がヒドイ。
一旦、改ページプレビューにしてから戻せば大丈夫ですとか、何だよそれ。

612

： デフォルトの名無しさん [sage] 2019/01/21(月) 23:15:39.37

:liT1rB8S

64bitはスクリプトオブジェクトがないとかは？

613

： デフォルトの名無しさん [] 2019/01/22(火) 00:07:05.98

:TC75Tgsq

よろしくお願いします。
あるシートのコピーだけを新規の別ファイルとして保存したいのですが、

1　dim fn as string
2　fn="c:\*****\集計表.csv"
3　ThisWorkbook.Worksheets("集計表").Copy
4　Application.DisplayAlerts = False
5　ActiveWorkbook.SaveAs fileName:=fn, FileFormat:=xlCSV
6　ActiveWorkbook.Close

このように書きました。普通だと問題なくいっているのですが、この処理をしている途中で、
使用者がガチャガチャとマウスをイジり、いくつも開いているうちの適当なブックをアクティブにしてしまった
りなどしてると、想定通りの動作をしなくなってしまいます。
3行目でコピーしたときに、コピー先のその新しいブック自体を名指しできれば、いいのではないかと
思うのですが、いかがでしょうか？
「ActiveWorkBook」ではなく、ちゃんと名指しする方法ってないでしょうか？

614

： ◆QZaw55cn4c [sage] 2019/01/22(火) 00:33:28.43

:zFHfz07h

いろいろな事情があって、ExcelVBA に専心することになりそうです…Excel VBA から任意の win32api を呼び出すことは可能ですか？

615

： デフォルトの名無しさん [sage] 2019/01/22(火) 00:44:54.38

:KMNb7p7Q

>>613

処理中いじるなと表示させたフォームをモーダルにして処理終わるまで×ボタン消しとくとかは？

616

： デフォルトの名無しさん [sage] 2019/01/22(火) 02:38:45.16

:WVGq8ekA

activeじゃなくてもsaveできるだろ

617

： デフォルトの名無しさん [sage] 2019/01/22(火) 05:03:39.16

:1xYsQegz

>>613

方法１：新規ブックはWorkbooksコレクションの末尾に追加されるはずなので、Workbooks (Workbooks.Count)で参照できます。

方法2：先に新規ブックを作っておけば参照出来ます。
余計な新規シートが触られる不安があるなら削除する必要があります※
例）
With Workbooks.Add
　 Dim fn As String: fn = "c:\*****\集計表.csv"
Worksheets("集計表").copy Before:=.Worksheets(1)
Application.DisplayAlerts = False

Dim elem As Worksheet '※
For Each elem In .Worksheets
If elem.Name <> "集計表" Then elem.Delete
Next elem

.SaveAs Filename:=fn, FileFormat:=xlCSV
.Close
End With

方法3：集計表なので数式が入っていると思いますから、Copy時のCalculateイベントでシート自身に保存させます。
例）
Private Sub Worksheet_Calculate()
If Worksheets.Count > 1 Then Exit Sub 'Copyされた単一シートか判定
Dim fn As String: fn = "c:\*****\集計表.csv"
Application.DisplayAlerts = False
ThisWorkbook.SaveAs Filename:=fn, FileFormat:=xlCSV
ThisWorkbook.Close
End Sub
上記を集計表シートのシートモジュールに書き込むと、Worksheets("集計表").Copy だけで自動的に保存されます。

618

： デフォルトの名無しさん [sage] 2019/01/22(火) 05:11:20.49

:1xYsQegz

Worksheets("集計表").copy
↓修正
ThisWorkbook.Worksheets("集計表").Copy 👀
Rock54: Caution(BBR-MD5:1341adc37120578f18dba9451e6c8c3b)

619

： デフォルトの名無しさん [sage] 2019/01/22(火) 08:07:57.46

:rTM/luD7

>>614

トリッキーな技が技があるかもだけど「任意の」となると単独では無理と思った方がいい

620

： デフォルトの名無しさん [sage] 2019/01/22(火) 08:14:29.14

:J7GVb3Rk

>>614

任意ってのはどういう意味?
動的に呼び出したいってこと?

それだったらかなり高度になる。

621

： デフォルトの名無しさん [sage] 2019/01/22(火) 12:45:48.79

:/p6ZcYuK

declareで追加するだけでしょ
ぐぐればサンプル大量に出てくるし
高度でもない

622

： デフォルトの名無しさん [] 2019/01/22(火) 13:00:35.87

:/wbMKv3O

厚生省の中の人がプログラムで不正するように描いてたのってExcel?

623

： デフォルトの名無しさん [sage] 2019/01/22(火) 14:06:11.20

:Hs2/RF8Y

あれはファイルの更新日をいじっただけだったはず（開いて上書き保存かもしれんが）

624

： デフォルトの名無しさん [sage] 2019/01/22(火) 16:11:53.74

:twW7M/a9

関数間違えたって報道されてなかったっけ

625

： デフォルトの名無しさん [sage] 2019/01/22(火) 20:39:31.87

:J7GVb3Rk

>>621

それは静的に呼び出すということ。

動的の場合は、LoadLibraryとかGetProcAddressとかを使う話になる。

昔、調べまくってサンプル作ったことあるけど、何でも自由に動かせるものじゃなかった。
というより殆どのAPIは動かなかった記憶が。

626

： デフォルトの名無しさん [sage] 2019/01/22(火) 20:52:29.66

:nExxZ55X

LongPtr型とPtrSafe宣言ってそれぞれどういうときに使うんですか？

627

： デフォルトの名無しさん [sage] 2019/01/22(火) 20:59:55.76

:IR20P2NM

>>626

どっちも64bitでAPI呼ぶ時に使うけど、ほかの使い方は知らん

628

： デフォルトの名無しさん [sage] 2019/01/22(火) 22:38:47.81

:CihaJZ6+

Excelはどのくらいポリゴン表示出来るの?

1. PS並み
2. PS2並み
3. PS3並み
4. PS4並み

629

： デフォルトの名無しさん [] 2019/01/23(水) 00:32:34.72

:glGBkXdT

5. PS5並み

630

： デフォルトの名無しさん [sage] 2019/01/23(水) 00:54:57.75

:26O4EHUh

今のPCならオートシェイプで3DレンダリングしてもPS1には楽勝だろう

631

： デフォルトの名無しさん [sage] 2019/01/23(水) 01:22:36.39

:xNUzgFQe

>>617

ありがとうございました！

632

： デフォルトの名無しさん [sage] 2019/01/23(水) 03:00:22.02

:aTlBVQjl

ttp://http://blog.livedoor.jp/genkimaru1/archives/2095759.html

633

： デフォルトの名無しさん [sage] 2019/01/23(水) 13:19:24.15

:dfxLcevf

闘神伝のエリスのシースルーは再現可能ということですね。

634

： デフォルトの名無しさん [] 2019/01/23(水) 13:59:08.25

:b9b+73n9

>>625

馬鹿には無理

635

： デフォルトの名無しさん [sage] 2019/01/23(水) 15:57:45.44

:uebkOjvn

もともと「任意の」APIだったのが途中から動的に呼び出す話になってる

636

： デフォルトの名無しさん [sage] 2019/01/23(水) 16:19:34.41

:CpZRwgZL

回答者の連中が勝手に条件を考えて話をややこしくするのも
質問者がそれを修正しようとしないのもこのスレのお約束

637

： デフォルトの名無しさん [sage] 2019/01/23(水) 17:37:28.67

:uebkOjvn

だいたいDeclareなしに呼び出さなきゃいけない要件なんてあるか？
候補となるAPIの範囲なんてどう考えても限られてるだろう。
ジグネチャ情報ごと外部からもらうのか？

638

： デフォルトの名無しさん [sage] 2019/01/23(水) 21:06:47.46

:e5qX8jhS

>>637

プラグインdllを呼び出すような要件だな。
プラグインdllを指定のフォルダに入れてもらうようにしておいて、呼び出し方はこちらで決めておく。
指定フォルダからdllファイルを列挙して、ファイル名と、決められた通りの呼び出し方で呼び出すやり方になるからDeclareは使えない。

まあ、めったに無いだろう。

>>635

「任意」の意味がよく分からん。
動かしている最中に「任意」のAPIを呼び出したいという意味かと思った。
それともcdecl呼び出しのAPIは基本的に出来ないっていうような話をすれば良かった?
まあ、DispCallFuncでゴニョゴニョで出来るんだけども。

639

： デフォルトの名無しさん [sage] 2019/01/23(水) 22:47:22.53

:9/VHRHNs

VBAでは（トリッキーなことしないと）作れない引数型のAPIのこととかじゃね？

640

： デフォルトの名無しさん [] 2019/01/24(木) 09:54:58.66

:9Yy7hd5n

初歩的かもしれない質問でお恥ずかしいのですが、知恵をお貸しいただきたいです。

1年の中で最大の数値が含まれる日付の値全てを別シートに貼り付けるというVBAプログラムを作成したいです。
また、この場合の1日とは前後1日分ではなく、その時間が含まれる1日の事です。

例えば、30分毎の売り上げ金額が入力されたexcelシートが1年分あるとします。

1年間の中で最大の売り上げ金額が、2018/2/14 12:30に存在すると仮定します。

その場合に、2018/2/14 0:00～ 2018/2/14 23:30
の値を抜き出し、別シートに貼り付けるというプログラムを作成したいです。

データの形は、

2018/2/14 0:00 300
2018/2/14 0:30 200
・
・
・
2018/2/14 23:30 500

のようになっています

自分でも一通り調べてみたのですが、どうしてもしっくり来るものが見つかりませんでした。

どうぞよろしくお願い致します。

641

： デフォルトの名無しさん [] 2019/01/24(木) 12:17:49.04

:6DEMoFXg

>>638

おまえは頭が悪くて他人にものを教えられる様な人間やない
ちゅう事をそろそろ思い知った方が幸せになれるで

642

： デフォルトの名無しさん [sage] 2019/01/24(木) 12:27:34.76

:kIY0kOtD

>>640

問題を分割して考えよう

1. 最大の値を持つ行（と言うか日時）を取得する → 最大日時とする
2. 以下を最初の行から最後の行までループする
2.1 行が持つ日時と最大日時の日付部分だけ比較する
2.2 日付部分が合致してたらコピーする

で、どこがわからないの？

643

： デフォルトの名無しさん [] 2019/01/24(木) 12:37:36.92

:6BCdjRMd

調べるだけで頭を使っていないのだからわかるわけない
ゆとり教育世代にありがち

644

： デフォルトの名無しさん [sage] 2019/01/24(木) 12:38:49.74

:FgOMH45t

>>641

自分が頭が良いということを全く証明もせずに絡んで来られても困るんだがw

こういう絡み方で頭悪そうだとは思うけどね。

645

： デフォルトの名無しさん [] 2019/01/24(木) 12:55:51.34

:6DEMoFXg

実にバカらしい困り方やね

646

： デフォルトの名無しさん [] 2019/01/24(木) 13:12:21.15

:Ay2CLdQj

>>643

マウント取りたいだけの老害
なんの生産性もないからやめた方がいいよ

647

： デフォルトの名無しさん [] 2019/01/24(木) 13:13:31.30

:+O0AGYtG

hoge.dll だけあるときに hoge.def を作りたいんだけどどうすればいい？

648

： デフォルトの名無しさん [] 2019/01/24(木) 13:38:55.05

:pEQDGUsa

>>646

悔しかったか、ゆとり世代

649

： デフォルトの名無しさん [] 2019/01/24(木) 14:52:02.40

:DfMDGTcZ

>>642

おっしゃる通り１つずつこなしていきたいと思います。

最大値を取得する所まではなんとかなりましたが、最大値が入っているセルの左からoffsetによって値の取得をしようとしています。しかしエラーが出てしまい(91エラー)詰まっています。

650

： デフォルトの名無しさん [sage] 2019/01/24(木) 14:57:02.89

:xR9TqB96

>>647

defファイルってビルドの時に使うもんだけど？

651

： デフォルトの名無しさん [] 2019/01/24(木) 15:26:49.03

:ou4FYlNm

>>649

馬鹿過ぎだろ
もっと悩んでから来い、ゆとり

652

： デフォルトの名無しさん [sage] 2019/01/24(木) 15:36:46.38

:xR9TqB96

罵倒芸術？

653

： デフォルトの名無しさん [] 2019/01/24(木) 15:53:26.03

:DfMDGTcZ

>>651

そうします
ありがとうございます

654

： デフォルトの名無しさん [sage] 2019/01/24(木) 16:52:58.88

:90ICJGKL

>>651

お前なにしにきてんだここに。
最低だな、人として。

655

： デフォルトの名無しさん [sage] 2019/01/24(木) 17:31:43.23

:uc3iE4iQ

>>642

で答えを教えてもらっても理解できないような頭の悪さが問題だろう。こんな頭の悪い奴はプログラムするなと俺は思う。

656

： デフォルトの名無しさん [] 2019/01/24(木) 17:52:28.54

:Ay2CLdQj

ほー

>>655

くらいの天才になると最初からプログラム完璧に理解できたらしいな
凄い凄い

>>653

めげずに頑張ってくれよ
だれでも最初は初心者だ

657

： デフォルトの名無しさん [sage] 2019/01/24(木) 18:00:27.00

:A3Pe4Ldy

VB6で作ったADOを使ってデータベースからエクセルシート名をComboBoxに入れるソフトがあって、それをwindows10で動かすとエラーで止まるんだけど原因分かりますか？
シート名が一文字の時だけエラーが出るのは分かったけど何か理由だと思いますか？

658

： デフォルトの名無しさん [] 2019/01/24(木) 18:15:16.93

:pEQDGUsa

>>657

ここが何のスレだかわかってるか、馬鹿

659

： デフォルトの名無しさん [sage] 2019/01/24(木) 18:58:14.37

:5lzQ1hz1

>>640

その日付でアドバンスフィルタ。
検索する側の日付と、検索される側の日付は、
何型でもいいから統一する。
LeftやMidと"/"を組み合わせとか、
Format(日付, "yyyy/mm/dd")とか適当に。

660

： デフォルトの名無しさん [sage] 2019/01/24(木) 19:06:26.31

:5lzQ1hz1

アドバンスフィルタが何なのかわからなかったら、
フィルタオプションの設定の使い方を覚えて、
マクロの自動記録をするといい。

ちなみに、ループより激速だから。

661

： デフォルトの名無しさん [sage] 2019/01/24(木) 19:32:10.91

:fZR3dOZW

>>640-642

Ruby で作った

# 各行は空白で区切った、3列の配列。
# 全行は各行の配列、つまり配列の配列
all_rows = File.readlines( "input.txt" ).map( &:split )

# row[ 2 ]、金額が最大数値の行を求める
p max_row = all_rows.sort_by { |row| row[ 2 ].to_i }.last

# 全行からrow[ 0 ]、同じ日付の行だけを集める
p all_rows.select { |row| row[ 0 ] == max_row[ 0 ] }

662

： デフォルトの名無しさん [sage] 2019/01/24(木) 21:13:39.94

:52bEuJTy

>>661

ここが何のスレだかわかってるか、馬鹿

663

： 661 [sage] 2019/01/24(木) 21:19:22.76

:fZR3dOZW

>>661

修正

# row[ 2 ]、金額が最大数値の行を求める
>p max_row = all_rows.sort_by { |row| row[ 2 ].to_i }.last
p max_row = all_rows.sort_by { |row| row[ 2 ].to_i * -1 }.first

last だと、最後まで配列を作ってしまう。
一方、first では最初の1つだけを求めるから、速い

664

： デフォルトの名無しさん [sage] 2019/01/24(木) 22:01:17.17

:KN/tNrgV

>>661

は
ﾎﾞｸﾀﾝﾝRubyが出来るんだぞぉおエライんだ。ﾎﾞｸﾀﾝﾝを褒めろぉぉお
Rubyのスレでは褒める奴が居ないからここでエラぶりたいんだよぉお
なウスラバカ

665

： デフォルトの名無しさん [sage] 2019/01/25(金) 09:26:57.52

:VDjD4/gW

他言語質問スレの質問をRubyで解答するスレでもたてれば？

666

： デフォルトの名無しさん [sage] 2019/01/25(金) 10:27:26.03

:OaoSScvY

Rubyスレで相手にされず、ここならドヤ顔できるだろと思って来たのかw

667

： デフォルトの名無しさん [] 2019/01/25(金) 12:18:15.80

:aKVOVgYE

プロさん荒ぶりまくっとってワロタw

668

： デフォルトの名無しさん [sage] 2019/01/25(金) 12:37:49.55

:kDiuvRrn

Ruby信者くんどこのスレでもKYだよね

669

： デフォルトの名無しさん [] 2019/01/25(金) 12:52:29.05

:EnRgcOgq

dumpbin /exports hoge.dll
と
lib /def:hoge.def
でいけるな

670

： デフォルトの名無しさん [sage] 2019/01/25(金) 19:43:02.79

:EKURiA+R

DispCallFuncって最近また流行ってるの？

671

： デフォルトの名無しさん [sage] 2019/01/26(土) 07:48:55.80

:SzhvFgNa

Private Function getIE(arg_title As String) As InternetExplorer
↑
こういう書き型ってどういう意味になるんですか？
普通に関数を作るなら
private fanction 関数名(ByVal 引数名 as 引数の型)
みたいな形になると思うんですが
上記にあげた例でとくに引数を()で閉じた後のas InternetExplorerの部分がよくわかりません

672

： デフォルトの名無しさん [sage] 2019/01/26(土) 08:30:57.60

:0//Vwm17

>>671

"as 引数の型"の意味が理解できるなら
"as InternetExplorer"は簡単に想像つくだろ

673

： デフォルトの名無しさん [sage] 2019/01/26(土) 09:22:53.54

:xtvWXKE/

Private Sub 関数名(引数名 As 引数の型)
Private Function 関数名(引数名 As 引数のデータ型) As 戻り値のデータ型

674

： デフォルトの名無しさん [] 2019/01/26(土) 09:34:59.74

:HSTKeB2g

VBAやってるなんて恥ずかしくて言えないだろ？

675

： デフォルトの名無しさん [sage] 2019/01/26(土) 09:38:00.59

:+NbQI97A

>>671

中の処理を見ないとわからんけど、
そういう書き方をする場合、普通に考えたら、
getIEにInternetExplorerのオブジェクトがセットされて返ってくる。

676

： デフォルトの名無しさん [sage] 2019/01/26(土) 09:49:01.06

:/P2VC+Mr

タイトルバーの文字列からウィンドウを検索する関数だろ
IE操作のサンプルとして、ネットでも本でも色んな所で見かけるやつ

677

： デフォルトの名無しさん [sage] 2019/01/26(土) 09:59:33.30

:0//Vwm17

>>674

あらたまって「俺VBAできます」なんて言うことは無いけど
問題の解決にVBAが最善なら偏見持たずに採用するよ

678

： デフォルトの名無しさん [sage] 2019/01/26(土) 10:13:39.98

:54XYYYdu

初心者に優しくなろうぜ

679

： デフォルトの名無しさん [sage] 2019/01/26(土) 10:33:16.30

:MaEquCGy

どうしても使わなきゃならない場合にはVBAを使う
なにも理由がなければこんなもの使わない方が精神的に健全

680

： デフォルトの名無しさん [] 2019/01/26(土) 10:56:55.38

:z7S/RMkn

Windows10のアップデート1809を適用したらcreateobject("InternetExplorer.application")でオートメーションエラー(実行時エラー -2125463506)が発生するようになりました。

これを回避する方法があれは教示ください。

681

： デフォルトの名無しさん [sage] 2019/01/26(土) 11:00:34.08

:MaEquCGy

>>680

他の言語とSeleniumを使う

682

： デフォルトの名無しさん [sage] 2019/01/26(土) 11:08:46.81

:+NbQI97A

>>680

参照設定もInternetExplorerMediumもダメ?

683

： デフォルトの名無しさん [] 2019/01/26(土) 11:09:00.46

:z7S/RMkn

>>681

会社の方針でOffice以外のアプリや言語は使えません。そのため、VBAのみとさせてください。

684

： デフォルトの名無しさん [sage] 2019/01/26(土) 11:13:02.00

:MaEquCGy

>>683

ではIEも使えないのですね？

685

： デフォルトの名無しさん [] 2019/01/26(土) 11:17:13.78

:z7S/RMkn

>>682

参照設定はInternetcontrolsとHTML object libraryを設定しています。これは適用前と変わりません。

New InternetExplorerMediumでもおなじエラーが発生します。

1809適用前の他PCでは正常に動きます。

686

： デフォルトの名無しさん [] 2019/01/26(土) 11:18:26.43

:z7S/RMkn

>>684

すみません、クロームやエッジは使えませんが、IEは可能です。

687

： デフォルトの名無しさん [sage] 2019/01/26(土) 11:32:26.37

:MaEquCGy

なるほど状況はわかりました

問題の検証にはまず最初に他の言語が必要です
パワーシェルの使用許可を取ってください

688

： デフォルトの名無しさん [sage] 2019/01/26(土) 12:31:44.07

:WRAGgpBx

>>683

マジメな話、本当にダメなのかは思い込みの部分が多いんじゃないかと思うぞ

689

： デフォルトの名無しさん [sage] 2019/01/26(土) 12:33:07.15

:SzhvFgNa

>>672

>>673

>>675

ありがとうございます。VBAは戻り値の型も指定できるんですね。
というか、思い出しました、Ｃ言語でも頭にstringとかintとかつけましたね。
あれが末尾に来てこういう書き方になると。
ありがとうございました。

690

： デフォルトの名無しさん [sage] 2019/01/27(日) 07:11:52.32

:KwlBhw9C

しかしVBAは良くて他がダメっておかしな話だな
使い勝手が違うだけで、大概の事出来ちゃうだろ

691

： デフォルトの名無しさん [sage] 2019/01/27(日) 07:15:14.02

:MJttX1my

>>690

VBAの利用を推奨していないのは他でもないMSだ

692

： デフォルトの名無しさん [sage] 2019/01/27(日) 07:25:44.98

:v6cey9sT

逆に、C#にできてVBA+APIでできないことって何がある？

693

： デフォルトの名無しさん [sage] 2019/01/27(日) 07:37:49.03

:94l2cllZ

ソフトウェアが端末毎に異なると動作検証の障害になるケース

694

： デフォルトの名無しさん [sage] 2019/01/27(日) 07:53:57.32

:e7HDIdYV

もうよそいけよ

695

： デフォルトの名無しさん [] 2019/01/27(日) 08:13:04.45

:/fU4frLP

IE参照とか終わっとる

696

： デフォルトの名無しさん [sage] 2019/01/27(日) 08:29:08.12

:MJttX1my

>>692

そらWebアプリとかスマホアプリとかMac/Linuxとかゲームとか科学技術計算とかいくらでもある
VBA(API, COMなし)で無理なく可能、かつExcelワークシート操作が必要な場合に態々C#を使うのはそれこそ馬鹿の一つ覚えだと思うけどね

697

： デフォルトの名無しさん [sage] 2019/01/27(日) 08:59:08.57

:DsJJt6N4

希に、変数が定義されてませんみたいなエラーが出るんだけど、何だろう?
しかも変な位置で。

Dim a As Long : a = 1
Dim b As Long : b = 1
MsgBox a　　　　　　　←普通、aにエラーが出るとしたらここだけど、
Cells(a, 1).Value = b　←なぜかこの時点で出る

Excelを再起動しても治らないんだけど、
3行目と4行目を入れ替えて、また戻すと治る。
わけわからん。

698

： デフォルトの名無しさん [sage] 2019/01/27(日) 09:48:02.97

:UZak3JEV

参照設定を確認かな…

699

： デフォルトの名無しさん [sage] 2019/01/27(日) 11:10:55.75

:RJ6yXKbG

当方、excel2010の新しいブックでテストしても何の問題もなし

700

： デフォルトの名無しさん [sage] 2019/01/27(日) 12:04:29.48

:5DHtGtFO

> MsgBox a
で値は表示されてるのか？
表示されてるなら値はどうなっているのか？

701

： デフォルトの名無しさん [sage] 2019/01/27(日) 12:48:15.98

:TaAzn7Fo

全角空白とか混ざってない？
マルチステートメントもやめよう

702

： デフォルトの名無しさん [sage] 2019/01/27(日) 14:13:43.46

:eEXpRKk5

マルチステートメント推進

703

： デフォルトの名無しさん [sage] 2019/01/27(日) 15:18:35.61

:g3iq6aIo

まじ?

704

： デフォルトの名無しさん [sage] 2019/01/27(日) 16:30:18.65

:DsJJt6N4

>>698

特殊なものはつかってないけど・・。

>>700

表示前にエラーになったから見てないや。

>>701

VBSで全角空白がダメなのは知ってるけど、VBAでは実行できてたので、気にしてなかった。
マルチステートメントって「:」使うやつ?

705

： デフォルトの名無しさん [sage] 2019/01/27(日) 16:31:28.53

:DsJJt6N4

↑途中送信しちまった。

Constは1行で書けるのに、Dimが2行になるのが嫌なので、宣言は1行にしてる。

706

： デフォルトの名無しさん [sage] 2019/01/27(日) 16:33:56.14

:DsJJt6N4

>>699

こっちは2013。
普通は問題ないんだよ。行を入れ替えて戻せば治るから、
構文的におかしいことも無いだろうし。

707

： デフォルトの名無しさん [sage] 2019/01/27(日) 18:01:05.46

:OBIAkwM2

コードのコピペをミスったとかじゃないかな
どこか編集すると大文字小文字や空白が自動的に修正されて直るとか

708

： デフォルトの名無しさん [sage] 2019/01/27(日) 18:29:58.57

:k4Sj+hy8

ttps://www.moug.net/tech/exvba/0130015.html

たぶんデバッグ中に宣言書いたりしたんやろ？
そう言うことするとバグる。

一旦コードコピーして、モジュール作り直せばいいよ

709

： デフォルトの名無しさん [sage] 2019/01/27(日) 18:33:24.52

:qv2Aznbx

そもそも1列目にはどんな数字が羅列されてるの

710

： デフォルトの名無しさん [sage] 2019/01/28(月) 20:10:52.48

:i9xb9DBB

1行目にデータを取って2行目に1行目を参照したmid関数を1行目と同じ数だけ用意したいのですが

Dim m As Integer
m = 1 'カウンタmを用意して1を設定
Do While Cells(m, 1) <> "" '1行目が空になるまでループ
Cells(m, 2).Formula = "=mid(" & Cells(m, 1) & ",15,5)" '2行目には真横のセルを参照したmid関数を入れる
m = m + 1
Loop

これじゃダメなんですが、4行目のmid関数をセルに代入するとき相対的にcells(m,1)を参照させていきたいんですが
どういう風に書けばいいんでしょうか？

711

： デフォルトの名無しさん [sage] 2019/01/28(月) 20:41:36.83

:9NcZtM+2

Cells(m, 2).Formula = "=MID(" & Cells(m, 1) & ", 15, 5)"

Cells(m, 2).FormulaR1C1 = "=MID(RC[-1], 15, 5)"

712

： デフォルトの名無しさん [sage] 2019/01/28(月) 20:42:27.70

:9NcZtM+2

みすった
Cells(m, 2).Formula = "=MID(" & Cells(m, 1).Address & ", 15, 5)"

713

： デフォルトの名無しさん [sage] 2019/01/28(月) 20:47:12.92

:i9xb9DBB

ありがとうございます、いけました！

714

： デフォルトの名無しさん [sage] 2019/01/29(火) 18:20:14.94

:uYHQBjCX

1から30の乱数字を5回ループした合計を出したい。
同一数字が出ることをよしとした場合のコードってどんなですか？

715

： デフォルトの名無しさん [sage] 2019/01/29(火) 18:28:48.64

:ywRkqTQf

>>714

For i = 1 To 5
　　s = s + Int(Rnd()*30+1)
Next

細かいことを言うと、「同じ数字が出てはいけない」などの条件を付けた時点で、それは乱数じゃなくなる

716

： デフォルトの名無しさん [sage] 2019/01/29(火) 19:08:34.73

:+icPBYbY

>>715

> 細かいことを言うと、「同じ数字が出てはいけない」などの条件を付けた時点で、それは乱数じゃなくなる
べつに乱数が欲しいとは言ってないようだが？

717

： デフォルトの名無しさん [sage] 2019/01/29(火) 19:40:09.62

:dBY1qrqG

「乱数字」ってなんだ？初めて聞く言葉だゾ

718

： デフォルトの名無しさん [sage] 2019/01/29(火) 19:42:57.71

:LpX7EYli

日本語だと乱数、乱数字は中国語で同じ意味

719

： デフォルトの名無しさん [sage] 2019/01/29(火) 20:05:34.32

:KErsf3wp

つまり

>>714

は中国の方ということね

720

： デフォルトの名無しさん [sage] 2019/01/29(火) 20:10:45.02

:aCb5tvGW

randbetween(1,30)は？

721

： デフォルトの名無しさん [sage] 2019/01/29(火) 21:04:31.66

:t1GGJDgX

WorksheetFunction.RandBetween
長いな

722

： デフォルトの名無しさん [sage] 2019/01/29(火) 21:09:20.18

:ZMlTx8zG

3D6+5とかをループ使わず一発で計算したいって質問なんじゃね？

723

： デフォルトの名無しさん [] 2019/01/29(火) 22:06:13.32

:5yOKK0P6

int(rnd()*146)+5

724

： デフォルトの名無しさん [] 2019/01/29(火) 22:13:12.12

:TIeo+FQH

>>723

←これが世間でバグと言われるものです

725

： デフォルトの名無しさん [] 2019/01/29(火) 22:19:46.43

:5yOKK0P6

>>724

どこがバグ？

726

： デフォルトの名無しさん [] 2019/01/29(火) 22:22:56.72

:TIeo+FQH

>>725

それぐらい自分で考えろやプロさんw
脳ミソついとらんかプロさんの頭にはw

727

： デフォルトの名無しさん [sage] 2019/01/29(火) 22:40:58.72

:2ngnqyHd

>>726

お前が馬鹿

728

： デフォルトの名無しさん [sage] 2019/01/29(火) 22:57:33.37

:ywRkqTQf

>>725

もっと簡単な例で考えれば分かる
1～6のサイコロ2個と、2～12のサイコロ1個で合計7の出る確率は、前者は6/36=1/6、後者は1/11
結果(確率)がまったく違うから、同じプログラムとは言えない

729

： デフォルトの名無しさん [] 2019/01/29(火) 23:02:31.19

:TIeo+FQH

ワイは

>>727

の恥ずかしさをもっと掘りさげたいんやw

730

： デフォルトの名無しさん [sage] 2019/01/29(火) 23:06:27.72

:kf38Yh2H

いつも思うんだが、どういう状況で使うんだよ。
Excelでゲームでも作るの?

731

： デフォルトの名無しさん [] 2019/01/29(火) 23:13:55.62

:TIeo+FQH

話をそらさずにもっと

>>727

の恥ずかしさを語り明かそうやw

732

： デフォルトの名無しさん [sage] 2019/01/30(水) 00:12:38.41

:7kXOqwqB

数学の確率は人間の直感を裏切ることがけっこうあるから、慎重に扱わないと痛い目を見る

733

： デフォルトの名無しさん [sage] 2019/01/30(水) 00:15:46.22

:mmfL+KpI

乱数が欲しいんて書いてないし

734

： デフォルトの名無しさん [sage] 2019/01/30(水) 00:18:07.14

:yYgJ37mP

確率が直感に合わないのはほとんどの場合解釈を間違えてるだけ

735

： デフォルトの名無しさん [sage] 2019/01/30(水) 00:21:14.29

:Q4JlCs68

バグと確率の問題をすり替えて逃げてる馬鹿がいる。どこにバグがあるか指摘してみろや。
VBAしかしらない馬鹿どもが。

736

： デフォルトの名無しさん [sage] 2019/01/30(水) 00:26:30.71

:4G8qGWeY

「乱数字」という言葉の意味がわからない限り、誰も何も回答できないわけだが
回答者が勝手に問題を作って議論を始めるいつものパターンになってるな

737

： デフォルトの名無しさん [sage] 2019/01/30(水) 00:34:51.85

:3ZvsJrgT

結果が意図と違っていたらバグ
たとえば乱数でサイコロをシミュレーションするプログラムで、どれだけ試行しても確率が1/6に収束しようとしなかったらバグがある

738

： デフォルトの名無しさん [sage] 2019/01/30(水) 00:36:43.73

:ILSDuF01

よっぽど悔しかったんだな。。。

739

： デフォルトの名無しさん [] 2019/01/30(水) 07:02:27.20

:3/CBrgdG

>>735

←バグの意味を知らんプロさんwwww
ええでもっと恥ずかしがってもwww

740

： デフォルトの名無しさん [] 2019/01/30(水) 12:54:53.35

:X+zaqEGo

よろしくお願いします。

あるxlsmファイルを、１ヶ月間だけ使える、という形にしたいです。
つまり、各使用者がそのファイルを自分のPCに置いてから、１ヶ月だけは操作できると
いうことなのですが、どのようにしたらよいかわかりません。

ファイルを開いたときに、そのファイルが設置後１ヶ月経っていたら「もう期限切れ」とメッセージを出して
操作を不可能にしてしまうのを考えていたのですが、その設置日というのをどう取得すればいいのか。

「USBメモリなどから、そのファイルがそのPCにコピーされた日」を取得するにはどうすればよいでしょうか？

741

： デフォルトの名無しさん [sage] 2019/01/30(水) 13:21:11.92

:TCBbgKI9

「ブックの作成日」でググって出てきた二つ目のサイト
外部リンク

742

： デフォルトの名無しさん [sage] 2019/01/30(水) 18:49:20.66

:vrvbffTa

鞄

743

： デフォルトの名無しさん [sage] 2019/01/30(水) 19:54:50.43

:E22FaIEN

Excel 2016 (64bit) のVBAで質問です

とある理由で、大規模桁の計算をしないといけなくなったので
取り急ぎLongLong型の配列を作って必要な演算を作ろうかと

そこで、エラーが出て悩んでいる案件と、ちょっとした疑問が

とりあえず、代入されるものが数値であるかのチェックは必要よね…と思い
IsNumeric関数を使おうかと思うのですが
これって、例えば100桁の整数を表す文字列でも通るんでしょうか…って通るみたいなんですが
上限は文字列として扱える上限まで行けるんでしょうか？

計算の都合で商を求める演算「\」を使ったところ、10^12 \ 2^22 あたりの計算でオーバーフローとなりました
（実際には、2^22のところはそのオーダーの定数）
「\」の計算は64bitに非対応なのでしょうか？

744

： デフォルトの名無しさん [sage] 2019/01/30(水) 21:02:23.30

:E37rjQ75

それこそPowerShell呼んでBigInteger使えよ

745

： デフォルトの名無しさん [sage] 2019/01/30(水) 22:56:12.99

:dsQEAAmt

>>740

基準日をどうするかにもよるけど、
一番簡単なのは、If 今日の日付 = 2019/2/28 Then Exit Sub 的なやつ。

746

： デフォルトの名無しさん [sage] 2019/01/30(水) 22:59:06.78

:dsQEAAmt

あ、コピーされた日か。
じゃあFileSystemObject使うとか。

747

： デフォルトの名無しさん [sage] 2019/01/31(木) 07:12:05.16

:Z5McOm4q

コピーされた日なんてどこにも記録されてないんだから取得のしようもないだろ

748

： デフォルトの名無しさん [sage] 2019/01/31(木) 07:50:39.64

:tKdk8GYp

起動時にあるセルが空白なら今の日付入れる。
空白でないのなら、セルの内容と今の日付を比べる。
セルは非表示のシートとかでよくね？

749

： デフォルトの名無しさん [sage] 2019/01/31(木) 08:17:14.63

:mZzaZtfh

>>744

別に作成されているマクロのコンポーネントになるので不採用ですね…。

750

： デフォルトの名無しさん [sage] 2019/01/31(木) 10:24:09.90

:ivIRiWY+

スルーされてるけど

>>741

に日付取得のソースが丸々載ってますよ
余程変なことをしなければ、コピー日時はファイルの（≠エクセルのプロパティ）の作成日時です
適当なセルをパスワード保護して、ブックモジュールのOpenイベントに空白条件で日付を入れるコードを書けば初回起動で記録されます。

\演算子が良く分からないのですが、除算の結果から小数点以下を消すという意味なら
Int(10 ^ 12 / 2 ^ 22)
でどうでしょうか

751

： デフォルトの名無しさん [sage] 2019/01/31(木) 12:39:08.81

:xxTKFGAk

>>749

WScript.Shell で呼べばいい
VBAのソース内に書いたPowerShell実行できるぞ

752

： デフォルトの名無しさん [sage] 2019/01/31(木) 12:43:51.49

:B2lY3/DV

>>751

何でそういう面倒くさい方法にしなきゃならんの?
VBAじゃどうにもならんという結論か?

753

： デフォルトの名無しさん [sage] 2019/01/31(木) 12:52:33.19

:xxTKFGAk

>>752

VBAでやろうとすれば自前で多倍長整数演算を実装する必要があり、開発とテストで誇張抜きで工数数百倍かかるよ

754

： デフォルトの名無しさん [] 2019/01/31(木) 16:39:19.38

:aH0rCOCG

>LONGLONG

>100桁の整数

あほですか

755

： デフォルトの名無しさん [sage] 2019/01/31(木) 19:07:59.37

:B2lY3/DV

>>753

だからさ、まずお前の結論としてVBAじゃ無理というのがあって、それからだろPowerShell云々は。

で、本当のところ、無理かどうかは分からんが、仮に無理だとしてどうしてPowerShellになるんだ?
別に他でも良いわけだろ。

756

： デフォルトの名無しさん [sage] 2019/01/31(木) 19:08:45.03

:2eoSLZbf

>IsNumeric関数を使おうかと思うのですが

On Error Resume Next
数字じゃないとエラーが起きるような処理
エラーが起きたら終了みたいな
On Error Goto 0

757

： デフォルトの名無しさん [sage] 2019/01/31(木) 19:28:01.37

:ivIRiWY+

>>IsNumeric関数を使おうかと思うのですが、上限は文字列として扱える上限まで行けるんでしょうか？

ちょっと質問内容が良く分からないのですが、

・そもそもLongLong型（64bit＝8バイト）の話では無かったのですか？100桁とは？
・ヘルプに有る通り文字列型の上限は2GBですが（以下同様）

仮に2GBの判定が出来たとしても、その膨大な時間を使うよりは例外処理してしまった方が早いと思います。

758

： デフォルトの名無しさん [sage] 2019/01/31(木) 19:28:54.99

:kne0z8/A

よくそんな仕事請け負ったな、依頼者に騙されてないか？

759

： デフォルトの名無しさん [sage] 2019/01/31(木) 19:31:09.20

:ivIRiWY+

お話を聞いてる限り、恐らく元々の依頼内容も勘違いされている部分があると思うので、
差し支えない範囲で教えて貰えれば根本的な部分に回答が出来るかもしれません。

760

： デフォルトの名無しさん [sage] 2019/01/31(木) 19:31:49.59

:ivIRiWY+

みんな同じ様な事言っててワロタ

761

： デフォルトの名無しさん [sage] 2019/01/31(木) 21:50:14.70

:xxTKFGAk

>>755

別にPowerShellでなくてもいいけど、標準のWindowsだけで特に追加で何か入れることなく使えて
多倍長演算もサポートしててVBAから簡単に呼べるのなんて他にある?

762

： デフォルトの名無しさん [] 2019/02/01(金) 01:19:40.80

:UQQ7ub0a

>>757

そちらの質問は興味本位です。与えられた数値に見える文字列を信じるなら不要です
それと、LongLong型で済むなら配列はいりませんし

やりたいことは、例えば「100桁同士の四則演算をする」というようなことです。
コンパイラのインストールをセキュリティポリシーで禁止されているので
困っているのですよ。

>>759

そちらは時間があれば勉強してみようかと
ただ、それで実装すると引き継ぐときに後の人が大変そうですが

763

： デフォルトの名無しさん [sage] 2019/02/01(金) 02:51:10.44

:Jdk/7rOF

100桁ぐらいなら、Ruby でも演算できる

764

： デフォルトの名無しさん [sage] 2019/02/01(金) 03:10:10.30

:HKJPuzL8

>>762

あまりに馬鹿過ぎて話しにならん
どうして馬鹿と言われるか理解できるか？

765

： デフォルトの名無しさん [sage] 2019/02/01(金) 04:03:45.69

:bJm3iiDn

>>750

初回起動で設定しても元のブックをコピーし直せば何度でも使える
何の条件で期間指定したいのかわからないけど
パソコン限定ならレジストリでも使うのかな

766

： デフォルトの名無しさん [sage] 2019/02/01(金) 07:03:41.22

:gp0X8o+d

言語の動作もわかっていないこんな奴に依頼するなんて。頼む方も頼む方。

767

： デフォルトの名無しさん [sage] 2019/02/01(金) 07:18:07.26

:76fUr+Yk

Excel VBAの質問スレだろ
質問も回答もする気無いならスルー出来んのか？

768

： デフォルトの名無しさん [] 2019/02/01(金) 07:44:04.79

:eMw5OSNU

答えられない質問はとりあえず馬鹿にして勢いで乗り切る方針のプロさんw
バカwww

769

： デフォルトの名無しさん [sage] 2019/02/01(金) 08:37:10.62

:UEAxmDKm

ComboBoxで↓を押して表示されるリストの行数は固定でしょうか？
表示行数を増やす方法がありましたら、ご教授ください

よろしくお願いします

770

： デフォルトの名無しさん [sage] 2019/02/01(金) 08:51:37.94

:76fUr+Yk

>>765

Excelのレジストリ操作だと簡単なのはそのパソコンのユーザー毎の設定だな
無論APIを使えば何でもできるけどね
所詮はバーチャルマシンも考えればユーザー側も何でもできる
その程度と思って使うか　ネットにDB持つかだな

771

： デフォルトの名無しさん [sage] 2019/02/01(金) 08:51:40.44

:8kRZ6Lw/

最近はexcel2010とVB.netで改元対応しています。
excelのイベント少ないなって思っているのですが、2016などの新しいのはイベントや関数などは増えているのでしょうか？
2019なんかはタブレット操作用のイベントもあったりするとかでしょうか？

772

： デフォルトの名無しさん [sage] 2019/02/01(金) 09:05:53.38

:qPCno0Ra

なんかすごいところだな

>>764

とか上から目線ってかもう天から垂直に見下ろして魔法打ち込んでるレベルだな
しかも書き込んでる時間が深夜3:00とか超絶生活者

773

： デフォルトの名無しさん [sage] 2019/02/01(金) 10:01:49.43

:FlvBcwUR

763 名前：デフォルトの名無しさん[sage] 投稿日：2019/02/01(金) 02:51:10.44 ID:Jdk/7rOF
100桁ぐらいなら、Ruby でも演算できる

ｹﾞﾗｹﾞﾗｹﾞﾗｹﾞﾗｹﾞﾗｹﾞﾗ

774

： デフォルトの名無しさん [sage] 2019/02/01(金) 10:50:03.45

:3Ud/K8J0

>>773

計算するライブラリーが有るってことじゃないの
Rubyしらんが

775

： デフォルトの名無しさん [sage] 2019/02/01(金) 10:54:24.80

:rRNrmt+/

>>771

VBAはレガシー扱いだからMSのポリシー的に積極的な機能追加は不可
ちなみにVB.NETのWindowsフォームも既にレガシーで開発終了してる

776

： デフォルトの名無しさん [sage] 2019/02/01(金) 10:55:12.36

:3Ud/K8J0

>>773

計算できるライブラリーがあるだけじゃないの
どんな言語でも、４則演算程度なら作れるだろ

777

： デフォルトの名無しさん [sage] 2019/02/01(金) 10:56:26.07

:wTTD69jh

VBAだって超多倍長演算ライブラリぐらいネットに転がってんじゃない？
ちなLongLongで扱えるのは18桁まで、乗除算でオーバーフローを起こさないようにするなら半分以下の桁で使うのが無難

778

： デフォルトの名無しさん [sage] 2019/02/01(金) 10:57:36.71

:3Ud/K8J0

すまん、ダブって書き込みしても～た

779

： デフォルトの名無しさん [] 2019/02/01(金) 15:50:46.63

:eD54qyaY

VBAなんて低級言語を真剣にやってるバカ
言い訳は色々あるんだろうけどそろそろちゃんとしたのを覚える時期だよ

780

： デフォルトの名無しさん [sage] 2019/02/01(金) 16:15:57.80

:9mJigrZN

>>779

心が病んでるな、かわいそうに。

781

： デフォルトの名無しさん [sage] 2019/02/01(金) 17:19:33.59

:oMFegD+z

低級言語・高級言語の意味すら分かってないのって
かわいいな

782

： デフォルトの名無しさん [sage] 2019/02/01(金) 18:56:31.92

:dMBA0PwK

もしレベル的な意味合いで貶すなら下級または低俗じゃないかな
低級だと金額的な意味合いだからオフィス製品みたいな安い言語使いやがって、という意味か
高い開発言語ってなんだろ

783

： デフォルトの名無しさん [sage] 2019/02/01(金) 19:14:07.93

:OpRhgdeW

>>779

お前の馬鹿頭ではアセンブラは何言語になっているんだ？

784

： デフォルトの名無しさん [sage] 2019/02/01(金) 19:21:01.59

:69So7CMb

どんな状況で100桁の計算が必要なんだよwwwwww
弾道計算でもするのかよwwwwww

どうしても必要だとして、
16777216を、256×256×256で表現するRGBみたいに、
分離して計算できないの?

785

： デフォルトの名無しさん [sage] 2019/02/01(金) 19:48:56.75

:oMFegD+z

桁数じゃあなくて精度の問題だろ
何桁精度が必要か
全部なら分けて計算するんだろ
整数限定かよ

786

： デフォルトの名無しさん [sage] 2019/02/01(金) 20:43:56.48

:ldeBmXAI

>>762

Mid関数がString型の限界である20 億文字（桁）まで対応出来るようなので、限界まで判定可能です。
実際に試そうと思ったのですが、1000万桁あたりからエラーは起きないものの処理が終わる気配がありませんでした。
また、311桁目から判定がFalseとなり正常に判定できませんので注意してください。

787

： デフォルトの名無しさん [] 2019/02/01(金) 21:29:30.54

:6BaLLxbK

>>772

腹筋イタイｗｗｗ

788

： デフォルトの名無しさん [sage] 2019/02/01(金) 21:35:52.61

:yy1ts1sJ

>>782

>低級だと金額的な意味合いだから
は？？？？？？？？？

789

： デフォルトの名無しさん [] 2019/02/01(金) 23:01:14.33

:UXXgl86T

>>764

中学生かそれ以下の質問だな

790

： デフォルトの名無しさん [] 2019/02/01(金) 23:02:01.30

:UXXgl86T

>>769

64kbの壁でぐぐれ

791

： デフォルトの名無しさん [sage] 2019/02/02(土) 02:17:14.50

:nzR6xkI9

>>786

こんな馬鹿に人月とかで請求されたらブチ切れる
馬鹿だから時間を食うだけだろ

792

： デフォルトの名無しさん [sage] 2019/02/02(土) 03:55:47.52

:XBSRuYVd

機械よりか人間よりかで低いか高いか

793

： デフォルトの名無しさん [sage] 2019/02/02(土) 06:09:03.94

:jIzNjlQE

>743
何桁通るかは別として、IsNumericって例えば"1.2e3"とか"\30"とかでもTrue返すんだけど、それはいいの？

794

： デフォルトの名無しさん [sage] 2019/02/02(土) 09:04:05.51

:jIzNjlQE

あと"&hDEADBEEF"とか"&o77"とか
ついでに全角/半角が混在しててもTrueだし、文字列の前後にスペースタブ改行なんかが入っててもTrueだね

795

： デフォルトの名無しさん [sage] 2019/02/02(土) 11:42:55.97

:QW9QiURg

declareのシグニチャー間違えたらフリーズするんだけどdllから型情報取れないの？？？？？

796

： デフォルトの名無しさん [sage] 2019/02/02(土) 13:15:40.31

:C6ef9W0S

>>795

調べりゃ出てくるんだからそんな面倒なことしなくてもよくね？

797

： デフォルトの名無しさん [sage] 2019/02/02(土) 19:22:50.38

:VsnxbMPu

そんなに桁数使うことあるの？
桁数ならアセンブラなら言語的な制限がないから
C++のインラインアセンブラで作ってDLL化しておけばいいんじゃない？
ま、あまり桁数が多い場合は外に出しても数字として扱えないだろうから
文字列として扱うしかないけど

798

： デフォルトの名無しさん [sage] 2019/02/02(土) 20:08:24.01

:mZCa7M9L

>>797

アホか
CPUがネイティブで扱える桁数は決まっている

799

： デフォルトの名無しさん [sage] 2019/02/02(土) 21:45:51.31

:l+0aiRcv

8bitCPUがネイティブで扱える電卓は決まっている

800

： デフォルトの名無しさん [sage] 2019/02/02(土) 22:18:38.36

:Ep74GMaU

昔々、256桁の四則演算ルーチン組んだことある。アセンブラで。
今なら VBAでも同じくらいの速度で動くんだろうな…

801

： デフォルトの名無しさん [sage] 2019/02/02(土) 22:40:50.50

:nzR6xkI9

このスレで質問する薄ら馬鹿に匹敵する馬鹿ばっか
Python3使えよというまともな提案が未だなし

802

： デフォルトの名無しさん [sage] 2019/02/02(土) 22:57:11.62

:IQGxMEya

801＜ｶﾏｯﾃｰ、ｶﾏｯﾃｰ、ﾎﾞｸﾁｬﾝｦｶﾏｯﾃｰ

803

： デフォルトの名無しさん [sage] 2019/02/02(土) 23:30:42.83

:32vETS5N

シート１をアクティブにしてWEBクエリで取り込んだあとReplaceで置換したいのですが
うまくいきません。なぜかF8でステップ実行したらできるのですが、普通に実行すると置換されません。
何がいけないんでしょうか。

804

： デフォルトの名無しさん [sage] 2019/02/03(日) 00:12:07.90

:1X9tFGjy

>>798

アホか桁繰り上げ繰り下げのフラグを知らんのか？
むかーしのZ80や6502だってメモリの許す限り
際限なく計算出来るわ

805

： デフォルトの名無しさん [sage] 2019/02/03(日) 00:35:40.02

:1X9tFGjy

そもそもそう言った計算方法を
知らなかったとしても
8bitや16bitしか演算に扱えなかった時代に
テレビゲームとかで255や65535を超える
スコアが表示されていたことを思い出せば
普通は人をアホ呼ばわりすることを
書き込む前に気付きそうなもんだけどな

806

： デフォルトの名無しさん [sage] 2019/02/03(日) 06:14:34.05

:eVzJd4zP

そういう処理をアセンブラでしかできないと思ってるからアホだって言われるんだよ

807

： デフォルトの名無しさん [sage] 2019/02/03(日) 06:43:05.61

:Q6V8DKqV

多少非効率になるけどたいていの言語で多倍長演算はできる
なので
> 桁数ならアセンブラなら言語的な制限がないから
とか意味わからん、って話だろ

808

： デフォルトの名無しさん [sage] 2019/02/03(日) 06:57:12.02

:1X9tFGjy

>>806

いや

>>798

はあからさまに
「CPUがネイティブで扱える桁数は決まっている」からって言ってるんだが？

それに俺は実現方法の一例を挙げただけだと思うが「アセンブラでしか出来ない」なんて
どこに書いてあるんだ？

もっとも、桁数制限のない計算を
もっと効率よくVBAで使用する方法が
あるのであればそれはそれで聞いてみたいけど

809

： デフォルトの名無しさん [sage] 2019/02/03(日) 07:06:03.78

:1X9tFGjy

>>807

効率を考えなければ別にC++の時点で出来るんだよ
なんでC++からインラインアセンブラを
使用するような話をしていると思う？

810

： デフォルトの名無しさん [sage] 2019/02/03(日) 07:34:17.85

:Q6V8DKqV

>>808-809

>>797

を見てからレスしなよ…

811

： デフォルトの名無しさん [sage] 2019/02/03(日) 08:52:19.94

:kk/DtOkp

>>805

まあ、単位が100点だと、後ろの00は飾りだと思うけどな。

812

： デフォルトの名無しさん [sage] 2019/02/03(日) 09:10:44.36

:eVzJd4zP

>>808-809

なに効率とか後付けしてんだアホ

あと「コンパイラのインストールをセキュリティポリシーで禁止されている」って書いてあるのを読めてないのもアホ

813

： デフォルトの名無しさん [] 2019/02/03(日) 09:36:56.46

:C7VVL/VH

ゼビウス1000万点超えは9999990で表示が止まるがゲーム続行

814

： デフォルトの名無しさん [sage] 2019/02/03(日) 09:40:40.04

:J1QLe6/n

足し算ならExcelでも実用レベルで作れるわ

815

： デフォルトの名無しさん [sage] 2019/02/03(日) 10:00:11.19

:tEc8TngX

>>812

> あと「コンパイラのインストールをセキュリティポリシーで禁止されている」って書いてあるのを読めてないのもアホ
今時C#とかVB.NETのコンパイラなんてインストールいらんぞ
情弱なのかXPでドヤってるのかは知らんけどw

816

： デフォルトの名無しさん [sage] 2019/02/03(日) 10:19:47.32

:vrXjtSxX

>>812

今のWindowsはインストールしなくてもC#コンパイラが最初から入ってる

817

： デフォルトの名無しさん [sage] 2019/02/03(日) 10:39:36.74

:eVzJd4zP

誰がC#とかVBの話してんだよアホども

818

： デフォルトの名無しさん [sage] 2019/02/03(日) 11:12:27.82

:tEc8TngX

>>817

コンパイラの話な
恥ずかしいからもう出てくんなw

819

： デフォルトの名無しさん [] 2019/02/03(日) 11:42:00.66

:o6ig8vkN

>>818

←恥を知らないプロさんwww

820

： デフォルトの名無しさん [sage] 2019/02/03(日) 12:05:01.97

:Q6V8DKqV

ダサw

821

： デフォルトの名無しさん [sage] 2019/02/03(日) 15:02:23.40

:kTgfWuu8

>>817

日本語に不自由か真性のバカ発見

822

： デフォルトの名無しさん [sage] 2019/02/03(日) 15:51:29.62

:xJhhUajw

ｈｔｍｌ？のようなパラメーターのあるURLから　ActiveSheet.QueryTables.Add　を使って
WEBクエリで取り込むにはどうすればいいでしょうか？
一部変数を使うのですが文字列を結合するやり方ではうまくいきません。

823

： デフォルトの名無しさん [sage] 2019/02/03(日) 16:02:39.05

:vrXjtSxX

>>822

認証やクッキーが必要か、URLが間違ってるか、エンコードが必要か、原因は色々考えられる

824

： デフォルトの名無しさん [] 2019/02/03(日) 22:56:23.72

:xJhhUajw

>>823

エンコードが原因みたいです。
&や=は使えないのですね。
返信ありがとうございました。

825

： デフォルトの名無しさん [] 2019/02/03(日) 23:53:48.67

:OgrV47La

以下のアプリを作って欲しい

画面上でオンスクリーンかなんでもいいので、文字が瞬間的に現れて消えるアプリ。
１つのばりばらに並んだ文字につき！約1秒から0.05秒の間で調節できるようにしたい。

文字のデータベースは、同ブック内の別シートにて管理するものとする。

826

： デフォルトの名無しさん [sage] 2019/02/03(日) 23:59:07.80

:I0mCFuyH

死ね

827

： デフォルトの名無しさん [] 2019/02/04(月) 03:07:11.70

:ZoDPv0KA

ExcelとかVBAじゃなくていいなら作るけど

828

： デフォルトの名無しさん [sage] 2019/02/04(月) 06:46:04.48

:d8a/a/xM

ttp://https://www.youtube.com/watch?v=wTkVZne-i2g

作るのは他の要件が有るだろうから他の人に
Excelのシートから枠線を消して全画面表示
ランダムに出す文字はワードアートを挿入したり
消すだけでいいだろ

829

： デフォルトの名無しさん [sage] 2019/02/04(月) 07:25:45.63

:d8a/a/xM

>>824

>&や=は使えないのですね。
エンコードでは使えるだろ、デコードはデコードする
文字の法則があるけど
ちなみに、エンコードやデコードは必要なの？

830

： デフォルトの名無しさん [sage] 2019/02/04(月) 07:29:54.23

:d8a/a/xM

このスレもワッチョイ入れたら？

831

： デフォルトの名無しさん [] 2019/02/04(月) 08:04:31.54

:q/1gUcq+

>>827

じゃあ、Androidアプリでいいから、つくってフリーでGoogleストアにだせる？

832

： デフォルトの名無しさん [sage] 2019/02/04(月) 08:24:31.69

:zwEJkqhi

ルパン三世？

833

： デフォルトの名無しさん [sage] 2019/02/04(月) 09:55:11.03

:fGXzCPh9

>>831

Androidアプリ関係ないだろ
VB C#なんかでCVS形式などでパラメーターで受けて表示するプログラムなら簡単に作れるってことだろ

834

： デフォルトの名無しさん [sage] 2019/02/04(月) 10:53:03.12

:Kbv/gmVc

フラッシュ暗算みたいなやつか？

835

： デフォルトの名無しさん [] 2019/02/04(月) 12:14:30.52

:q/1gUcq+

>>834

イエス。言語を選ばないとやっぱり難しい？

836

： デフォルトの名無しさん [sage] 2019/02/04(月) 12:40:18.01

:OuHrukdw

>>835

別にVBAでも簡単だと思うけど作成依頼だったら費用が発生するのが普通だと思うんだが。

0.05秒ってのがどうかだね。

837

： デフォルトの名無しさん [] 2019/02/04(月) 12:58:23.32

:+5141PVg

費用が発生しとる作成依頼なんか見たことないわw
何を言っとるんやこのバカw

838

： デフォルトの名無しさん [sage] 2019/02/04(月) 13:05:48.06

:aEyGOWy8

>>835

死ねよ

839

： デフォルトの名無しさん [sage] 2019/02/04(月) 14:32:52.57

:d8a/a/xM

>>835

別に難しくない
0.05秒を気にしている人もいるが、正確な時間を取得することは出来る
ワードアートの作成・削除の時間を気にしているなら、表示・非表示の切り替えで
対応すればよいだけ
全画面表示・タイトルバー・スクロールバー・シートタブの非表示
ボーダーも0に設定すれば良いだけ

840

： デフォルトの名無しさん [sage] 2019/02/04(月) 14:47:47.78

:Mgc+6WQD

取得できても(人間の反応速度と比較して無視できる程度の誤差で)正確に表示するのはExcelでは厳しいでしょ
ちらつきまくるよ

841

： デフォルトの名無しさん [sage] 2019/02/04(月) 15:08:11.96

:d8a/a/xM

まあ、出来ない人間には出来ないだけ、書き込む必要もないのに
やり方なんていくらでもある

842

： デフォルトの名無しさん [sage] 2019/02/04(月) 17:01:02.28

:fGXzCPh9

細かいこといわなければパワポでVBAで十分だろ

843

： デフォルトの名無しさん [sage] 2019/02/04(月) 18:26:41.76

:OuHrukdw

>>841

やってから言ってんの?
俺はまだ、やってないから気にしただけなんだが。

ちなみに、俺はVBAのUserFormもシートも使うつもりは無い。
スピードも速いとは思うが、何ぶん計測したことは無いからね。

844

： デフォルトの名無しさん [sage] 2019/02/04(月) 18:38:32.34

:OuHrukdw

>>837

自分は何もせずに依頼すれば出てくるというのは虫が良いだろという意味なんだが。

845

： デフォルトの名無しさん [sage] 2019/02/04(月) 18:51:55.31

:VG0XR/Gw

でも結局誰も作ってなくて草

846

： デフォルトの名無しさん [sage] 2019/02/04(月) 18:53:45.79

:fefAq5Di

まあ　出来の悪い奴は文句も多いからな

847

： デフォルトの名無しさん [sage] 2019/02/04(月) 19:28:29.36

:iZ37iel0

CSS アニメで作れば？

848

： デフォルトの名無しさん [] 2019/02/04(月) 19:59:53.09

:q/1gUcq+

>>845

1に作成依頼受け付けますと書いてあったから期待して依頼したが、馬鹿を見たよ

849

： デフォルトの名無しさん [sage] 2019/02/04(月) 20:02:20.97

:aEyGOWy8

>>848

じゃあ、
｢ExcelのVBAに関する質問スレです｣も守れや。死ねよ。

850

： デフォルトの名無しさん [] 2019/02/04(月) 20:08:32.00

:5NG821Xc

>>848

分かったよ
受けるよ

851

： デフォルトの名無しさん [sage] 2019/02/04(月) 20:19:41.54

:R+dJYoTm

vbaやってるサラリーって何故かマッチョ多くね？

852

： デフォルトの名無しさん [sage] 2019/02/04(月) 20:54:17.47

:VG0XR/Gw

>>848

ttp://https://www.axfc.net/u/3957636
初学者が作ってやったぞwほらよｗ
まぁもっと良いの

>>850

が作ってくれるやろｗ

853

： デフォルトの名無しさん [sage] 2019/02/04(月) 22:43:34.77

:lmibofpe

エディタは別のを使わずに備え付けのものを使いますか？

854

： デフォルトの名無しさん [sage] 2019/02/04(月) 22:52:12.63

:WAN0VVnl

高速でシートを切り替えるとか、
ふざけるのかと思ったら、結構真面目に作っててﾜﾛﾀ。

855

： デフォルトの名無しさん [sage] 2019/02/05(火) 08:19:52.51

:8bHFC9p3

>>854

後で見てみるけど、仕様になかったインターバルの時間とか可変で設定できる？

856

： デフォルトの名無しさん [sage] 2019/02/05(火) 08:25:47.35

:Bt9udYT0

フラッシュ暗算て何？
てっきりルパン三世だと思ったんだが

857

： デフォルトの名無しさん [sage] 2019/02/05(火) 09:46:15.11

:seWX9f2k

>>856

画面に数字が次々に出て暗算で合計を求めるやつ
外部リンク

858

： デフォルトの名無しさん [sage] 2019/02/05(火) 10:20:39.56

:Kjw5jSR6

>>857

まあ、これが評価できる最低限の仕様だな

859

： デフォルトの名無しさん [sage] 2019/02/05(火) 10:22:40.38

:Kjw5jSR6

ちゃんとしたのを、

>>850

が作ってくれるやろ
ことを期待しよう

860

： 828 [sage] 2019/02/05(火) 11:08:12.53

:Kjw5jSR6

>>828

　デフォルトの名無しさん2019/02/04(月) 06:46:04.48ID:d8a/a/xM

ttp://https://www.axfc.net/u/3957750

> 作るのは他の要件が有るだろうから他の人に
> Excelのシートから枠線を消して全画面表示
> ランダムに出す文字はワードアートを挿入したり
> 消すだけでいいだろ
最低限でもこの程度のことやれよっと、ワードアートの動作速度が問題なら全て作成してから
表示非表示を切り替えるだけだよっと

861

： デフォルトの名無しさん [sage] 2019/02/05(火) 11:15:39.50

:seWX9f2k

>>852

　
↑これで骨組みは十分だろ

862

： デフォルトの名無しさん [sage] 2019/02/05(火) 11:22:46.31

:Kjw5jSR6

>>861

こんなの客に提示するとすぐ帰っていくよ
イメージが違い過ぎる

863

： デフォルトの名無しさん [sage] 2019/02/05(火) 11:25:28.34

:Kjw5jSR6

行間を読めない奴はいつまでたってもろくなもの作れないんだよ
おれは、年取ったから行間いっぱいある奴は遠慮するけどな

864

： デフォルトの名無しさん [sage] 2019/02/05(火) 11:53:42.93

:Kjw5jSR6

ちゃんとしたのを、

>>850

が作ってくれるやろ
ことを期待しよう。

865

： デフォルトの名無しさん [] 2019/02/05(火) 12:15:44.59

:jg7BNmXb

なんやバカ必死やなw

866

： デフォルトの名無しさん [sage] 2019/02/05(火) 12:19:32.33

:8bHFC9p3

>>865

面白いな何で草はえるの

867

： デフォルトの名無しさん [sage] 2019/02/05(火) 12:32:36.37

:Kjw5jSR6

>>865

ちみぐらいバカをからかうのって私の趣味ではありません
あわれ過ぎるから

868

： デフォルトの名無しさん [] 2019/02/05(火) 12:53:49.77

:jg7BNmXb

加速するバカw

869

： 852 [sage] 2019/02/05(火) 12:54:18.46

:uJYvVabq

>>855

と

>>857

の要素を気持ち取り入れてみたよ
あとはもうシラネ
外部リンク

870

： 852 [sage] 2019/02/05(火) 13:02:38.95

:uJYvVabq

間違えた。こっちで

ttp://https://www.axfc.net/u/3957753

871

： デフォルトの名無しさん [sage] 2019/02/05(火) 13:05:08.57

:Kjw5jSR6

>>869

知らねえと言われても

ファイルが見つかりません
既にファイルが削除されたか、期限切れになったか、ダウンロード上限数に達した、若しくは誤ったURLが指定されています。
再度ご確認下さいますようお願い致します。

872

： デフォルトの名無しさん [sage] 2019/02/05(火) 15:50:53.68

:Kjw5jSR6

>>870

今さっき起きた。
ソースを１分程度見たけど、毛が１本生えただけだろ
オリジナル性もない、引かれている部分もありで
評価はマイナスだな、マクロを動かす気にもならん

873

： デフォルトの名無しさん [sage] 2019/02/05(火) 16:03:55.64

:Kjw5jSR6

>>857

ホントなんだよ、この映像少なくとも全画面表示で
他の表示はテスト中いらないは
結果は、答え合わせでちゃんと出るようにな
問題作成だって、何の機能もないって考えてないだろ
指定した桁数で数字を作成しろよ・・・こんなの仕様の内の一寸な

874

： デフォルトの名無しさん [sage] 2019/02/05(火) 16:18:43.72

:Kjw5jSR6

>>870

テストしないのは申し訳ないと思ってもう一度２０秒ぐらい見た
あまりにごみで、テストしてない

875

： デフォルトの名無しさん [] 2019/02/05(火) 20:09:31.48

:2313QgIt

必死すぎてアンタッチャブルのバカw

876

： デフォルトの名無しさん [sage] 2019/02/05(火) 20:30:50.84

:seWX9f2k

金もらえるならきちんと作るだろうけど金出さないんでしょ？

877

： デフォルトの名無しさん [sage] 2019/02/05(火) 21:01:45.45

:WLSIITfa

きちっとって　このレベルを１００倍してもくずはくずだな

878

： デフォルトの名無しさん [sage] 2019/02/05(火) 21:13:23.45

:seWX9f2k

ただでもらったものにケチつけるって人間としてクズだな

879

： デフォルトの名無しさん [sage] 2019/02/05(火) 21:45:13.17

:84y7DIGj

なんかつらいことがあったんでしょ
そっとしといてあげなさい

880

： 852 [sage] 2019/02/05(火) 23:50:58.70

:uJYvVabq

ユーザーフォームに変えてみた
あと少し機能を足してみた
外部リンク

ttp://https://www.axfc.net/u/3957855

881

： デフォルトの名無しさん [sage] 2019/02/06(水) 00:44:18.42

:ZnA/X3oO

A　B
1　あ
2　い
1　か
2　き
3　く
1　さ
1　た
2　ち

となっているデータを、連番でまとめて

あい
かきく
さ
たち

とするにはどうすればいいですか？

882

： デフォルトの名無しさん [sage] 2019/02/06(水) 01:00:17.91

:Piy/PJ2X

死ねばいいよ

883

： デフォルトの名無しさん [sage] 2019/02/06(水) 05:43:02.95

:DSThmZXP

死ねばいいよ

884

： デフォルトの名無しさん [sage] 2019/02/06(水) 10:06:21.68

:pkuTd0pW

関数で直接は難しいけどVBAでやるなら簡単だろ
ただそれもわからない人間に提示しても無駄だな

885

： デフォルトの名無しさん [sage] 2019/02/06(水) 10:48:09.84

:pkuTd0pW

>>880

マクロを実行してみた、君は自分で考えてるんで良いと思う
１．出力する問題は固定ではなく文字とか長い数字もいらない
　　桁数（上限・下限）を指定してランダムに数値を発生すること
　　フラッシュ暗算を考えると余分な機能はいらない
２．バックを全画面表示にすること
　　もちろん、画面の中央に表示する、画面の大きさから割合で文字の大きさを指定する
３．タイミングをｍｓで指定指定しているが
　　ディスプレーって最大解像度ではリフレッシュレート60hz（16.6msおき）程度なんだよ
　　ディスプレーの反応速度も早くて5msかかる、10ms単位で十分だが、好みはある
４．答えの表示がチェックだが
　　要するに終わった後、計算が合ってるかを確認するんだから
　　終了後に特定のキーを押したら答えを出すでいいだろ
ざっくり、大きく気になった点だけ、やり方は分からなければ聞け

886

： デフォルトの名無しさん [sage] 2019/02/06(水) 10:57:13.19

:pkuTd0pW

全画面表示は数字表示部をユーザーフォーム（全画面）で表示文字をVBAで切り替えたほうが簡単だな

887

： デフォルトの名無しさん [sage] 2019/02/06(水) 11:03:53.28

:inxqkSwn

上司気取りの人が上から目線でダメだしし出したけどこの人どんだけ偉いの？
まさか感謝でもしてもらえるとか妄想してんのかな

888

： デフォルトの名無しさん [sage] 2019/02/06(水) 11:26:06.43

:pkuTd0pW

>>887

で、君にはどんなダメ出しが欲しいんだ？

889

： デフォルトの名無しさん [sage] 2019/02/06(水) 11:34:27.39

:pkuTd0pW

まあ、自分で作って「フラッシュ暗算」で面白いものを作ってみろよ
自分で満足できないものは、他人は評価しないよ

890

： デフォルトの名無しさん [] 2019/02/06(水) 12:26:19.63

:FGND1cQA

おいwこのバカ必死すぎてダメ出しとかしだしたでw

891

： デフォルトの名無しさん [] 2019/02/06(水) 12:43:34.25

:eyuAOAwV

Dim i As Long
i = 1

Do While Range("A1").End(xlDown).Row > i
Cells(Cells(i, 1), 3) = Cells(Cells(i, 1), 3) + Cells(i, 2)
i = i + 1
Loop

答えやアドバイスをしないでマウントしてくるやつは結局何も出来ないやつと同じなので放置で。

892

： デフォルトの名無しさん [] 2019/02/06(水) 12:45:00.03

:eyuAOAwV

あ、質問の意味まちがえてたｗ

893

： デフォルトの名無しさん [sage] 2019/02/06(水) 12:50:23.01

:oteDmMe3

>>892

だよね
ひらがなのあ行か行…で括るっぽいし
2行目の2と4行目の2が紐づく1が違うから考えれば出来そうだけど面倒そう

894

： デフォルトの名無しさん [sage] 2019/02/06(水) 12:56:44.95

:pkuTd0pW

>>893

え、どんだけ

895

： デフォルトの名無しさん [sage] 2019/02/06(水) 12:58:37.07

:pkuTd0pW

バカって、すぐ熱くなるよな、面白いけど

896

： デフォルトの名無しさん [] 2019/02/06(水) 13:07:21.25

:eyuAOAwV

これでどうや！ｗ

Dim i, j, k As Long
i = 1: j = 1: k = 1 'i=データの行　j=書き込みセルの行 k=数列のカウント用

Do While Range("A1").End(xlDown).Row >= i

Cells(j, 3) = Cells(j, 3) + Cells(i, 2)

If Cells(i + 1, 1) <> k + 1 Then j = j + 1: k = 0
i = i + 1
k = k + 1
Loop

897

： デフォルトの名無しさん [sage] 2019/02/06(水) 13:15:51.19

:pkuTd0pW

>>896

>これでどうや！ｗ
何に対して言ってるのかな？。なんだろう？こんなの提示して？
よくわからんな

898

： デフォルトの名無しさん [] 2019/02/06(水) 13:22:01.82

:eyuAOAwV

>>897

ばっかだなぁ、881に対していってんだろｗ
つかお前マウントとることしかしないASDのザコという認識だから何も求めてない。レスいらない。
するならちゃんと自分で作ったものを提示してからだ。できたらあやまる。

899

： デフォルトの名無しさん [sage] 2019/02/06(水) 13:25:32.81

:pkuTd0pW

例えば
「Do While Range("A1").End(xlDown).Row >= i 」
こんなの"A1"と変数jとiが同期できていないことでプログラムじゃないよ

900

： デフォルトの名無しさん [sage] 2019/02/06(水) 13:27:12.93

:pkuTd0pW

>>898

うふ～面白いな

901

： デフォルトの名無しさん [sage] 2019/02/06(水) 13:30:48.46

:pkuTd0pW

>>898

からかうしかないけど、

ttp://https://www.moug.net/tech/acvba/0020006.html

って何か意味あるんか？
バカって面白いな

902

： デフォルトの名無しさん [sage] 2019/02/06(水) 13:34:49.77

:pkuTd0pW

>>898

頭悪いのに大変だな

903

： デフォルトの名無しさん [] 2019/02/06(水) 13:37:03.76

:eyuAOAwV

>>899

いや、そうじゃなくってよ。

俺はプロじゃないから変なことしてるかもしれない。いやあるだろう。
そいでお前は凄いのかもしれないけど結局何も作ってないわけだろ？
それって何も出来ないのと同じなんだから偉そうにするなって言いたいの。
お前さ、俺の言っている意味解ってる？

904

： デフォルトの名無しさん [sage] 2019/02/06(水) 13:41:27.75

:pkuTd0pW

>>903

無能が無能に教える意味あるか、無能が威張る意味あるか？
役に立つってなんだよ？
お前の満足は何だよ、作ったってことか？

905

： デフォルトの名無しさん [] 2019/02/06(水) 13:43:57.13

:eyuAOAwV

>>904

ん？お前無能なの？無能なのに威張ってるの？ダメじゃん。
役に立つって何？満足って何ってどういう意味？
俺はそんなこと書いてないけどそれはどこから出てきたんだ？
お前ののーみそか？

906

： デフォルトの名無しさん [sage] 2019/02/06(水) 13:44:16.40

:pkuTd0pW

おれがこのスレで作っても意味ないからな質問スレだ答えるだけ

907

： デフォルトの名無しさん [] 2019/02/06(水) 13:53:46.56

:eyuAOAwV

ああ、そういうことか。
質問には答えるけど代りにお前が作ることはないって意味でいいのか？
それがお前のポリシーなら俺はお前に口はさまないよ。
偉そうにされて終わるだけみたいだからお前には質問もしたくないけどな。

質問してるやつはいろいろ試して困ってるんだろ？
俺は動くもの見せて、あとは自分で工夫するなりなんなりした方が良いと思ってる。
だって、具体的なほうが解りやすいじゃん。
それに対してお前がどうこう言うことはないだろ？俺はお前に何も聞いてないんだから。

908

： デフォルトの名無しさん [sage] 2019/02/06(水) 13:57:29.30

:pkuTd0pW

>>907

まあ、補足すると具体的なものを使えるのは少し考えたやつ
考えない奴は応用できない、だから答えではなくヒントなんだがな

909

： デフォルトの名無しさん [] 2019/02/06(水) 14:10:39.95

:eyuAOAwV

>>908

うーん、辞書がわりに次々聞かれても結局俺が作ってるかいー！
みたいになりそうで確かに嫌だな。
ただお前凄そうなんだからそんくらいしてやってもバチあたらんべ。
あ、そこらへんは俺が口はさむことじゃないな、すまん。でももったいないわーほんまに。
俺は基本は自分で調べるから聞くことってほとんどないけど
本当に困っててもまともな返答来なさそうでここで聞けないからさらに困ることあるもん。
お前に言ってるわけじゃないけどライトユーザーからしたら雰囲気怖いよここ。

910

： デフォルトの名無しさん [sage] 2019/02/06(水) 14:12:54.78

:pkuTd0pW

>>880

お前、ちゃんと満足いくもの作ってみろ
やめるのは簡単だまんぞくできるレベルもお前しだい
おれは、ダメ出しはしてやるよ、ダメな点は数多いがプライオリティは下がっている

911

： デフォルトの名無しさん [sage] 2019/02/06(水) 14:32:47.81

:sQxfU38+

>おれがこのスレで作っても意味ない
は

>>880

も同様だな

912

： デフォルトの名無しさん [sage] 2019/02/06(水) 14:35:44.06

:pkuTd0pW

>>911

別にそれでいいが♡♡♡

913

： デフォルトの名無しさん [sage] 2019/02/06(水) 14:38:23.25

:sQxfU38+

次の質問どうぞ

914

： デフォルトの名無しさん [sage] 2019/02/06(水) 14:45:26.84

:Piy/PJ2X

頭が悪いのが丸わかりな次の質問どうぞ

915

： デフォルトの名無しさん [sage] 2019/02/06(水) 14:48:20.14

:54X0jJM7

マウントしたがりのバカしか居ないスレですけど、それでもよかったら質問をどうぞ

916

： デフォルトの名無しさん [sage] 2019/02/06(水) 23:06:50.96

:pkC1NeiE

パラパラ漫画作って、動画に撮って再生すればいいんじゃね?

917

： 852 [sage] 2019/02/06(水) 23:08:35.09

:gXPhlUR0

作ってるうちに楽しくなってつい作りこんでしまいました
外部リンク

ttp://https://www.axfc.net/u/3958012
変更点
・ランダム表示
・乱数生成
・（ほぼ）フルスクリーンモード(1920x1080、1600x900、1280ｘ720、800ｘ600の4種類の画面に対応)
・ユーザーインターフェースの強化
・デバッグを少々

最初に作ってほしいといっていた人の要望にかなってるかが心配

918

： デフォルトの名無しさん [sage] 2019/02/06(水) 23:27:15.81

:pkC1NeiE

フルスクリーンならDirectXだろ、と思ったら、
Windows10だと色々面倒なのな。

919

： 852 [sage] 2019/02/06(水) 23:33:49.56

:gXPhlUR0

いえ、知識がないだけです

920

： デフォルトの名無しさん [sage] 2019/02/07(木) 00:04:38.13

:o0PdMVgb

Excelの起動画面、ドラクエでエンカウントしたみたいな感じにできないかな。
緑画面に白文字でExcelって、ちょっと地味じゃない?

921

： デフォルトの名無しさん [sage] 2019/02/07(木) 00:55:54.67

:XTuXysWv

ID:pkuTd0pWだけど
やっぱり午前中はましだが午後は酒がだいぶ効いて
すまんな
まあ文字結合のお題はExcelの問題をコピペしたものだろう
これ関数とExcelの機能を使って解いた方が面白い

922

： デフォルトの名無しさん [sage] 2019/02/07(木) 01:10:49.40

:XTuXysWv

>>917

中身を見ていないが
ディスプレイの解像度を取得する(API)
外部リンク

923

： デフォルトの名無しさん [sage] 2019/02/07(木) 01:15:55.77

:XTuXysWv

ｃを作業列にして
結果をピボットテーブルを使って表示

924

： デフォルトの名無しさん [sage] 2019/02/07(木) 06:41:43.06

:C6bM/gU/

質問です

同じブック、同じシート上にある
任意の二つのセル間を
セルで直線を引きたいと思っています

例えばA1セルとD4セルを指定したら
A1、B2、C3、D4のセルが黒く着色されるような
そんな感じです

どのようなロジックを組めば宜しいでしょうか？

925

： デフォルトの名無しさん [sage] 2019/02/07(木) 07:17:58.06

:sLOxqlfO

>>924

まず動作仕様を決める
１，指定の仕方をどうするか　クリック　Or　別セルで指定
２，複数回線を引くのか　取り消しは同じ指定で取り消すのか
３，クロスしたセルの色は
４，線の色はどの様に指定するのか
５，全てクリアーする処理は必要か?

926

： デフォルトの名無しさん [sage] 2019/02/07(木) 07:27:46.12

:sLOxqlfO

>>924

セルの色の指定方法は、マクロの記録でセルの色を変えて、マクロの記録の終了で確認してください

927

： デフォルトの名無しさん [sage] 2019/02/07(木) 08:42:01.81

:94HRw/Ac

>>924

何に使うのかが謎だ。
絵でも描くのかな？

928

： デフォルトの名無しさん [sage] 2019/02/07(木) 08:46:47.16

:C6bM/gU/

>>925

返答ありがとうございます
特にトリガーは定めていませんし
複数回引くことも考慮しなくていいです
こちらとしては
「二つのセル間にセルで線を引くこと」の
実際にどのセルが着色対象となるのかが
求められるロジックが必要となっています

>>926

ありがとうございます
ただ、上記しました通り
着色自体が焦点ではなく
どのセルが着色対象となるのかを
求めることができればなぁと考えています

929

： デフォルトの名無しさん [sage] 2019/02/07(木) 09:04:22.19

:sLOxqlfO

>>928

セルの位置情報から列の差が大きいか行の差が大きいかでループする側を決定します
ループする側は１増えるいく
その数に小さい側を大きい側で割って少数側を四捨五入したものが小さい側の増分でいいでしょう

930

： デフォルトの名無しさん [sage] 2019/02/07(木) 09:09:14.04

:sLOxqlfO

追記　ループ変数は０から差分まで
列ぎょうとも　初期値に増分を足していく

931

： デフォルトの名無しさん [sage] 2019/02/07(木) 09:45:06.58

:aUTfkvT8

列幅、行幅ともにまちまちだと考えるとマジメに座表計算がいりそうだ

932

： デフォルトの名無しさん [sage] 2019/02/07(木) 10:25:13.14

:nA5U51xW

>>931

セル単位での指定だから、幅は関係ない

933

： デフォルトの名無しさん [sage] 2019/02/07(木) 10:30:41.24

:nA5U51xW

>>931

すまん、関係あるなそれをかんがえると確かに難しいが
実質的にその構造で線を引く意味あるのかな？

934

： デフォルトの名無しさん [sage] 2019/02/07(木) 11:11:43.55

:nA5U51xW

>>917

この感覚だと、遠いな

935

： デフォルトの名無しさん [sage] 2019/02/07(木) 11:16:37.25

:nA5U51xW

>>931

所詮線はシェイプで引けばいいだけだからな
セルの色を変えることにどんな意味があるかが問題

936

： デフォルトの名無しさん [sage] 2019/02/07(木) 11:38:14.89

:aUTfkvT8

>>935

セルにシェイプが掛かっているかはすぐ判定できるんだっけ？
できるならまあ簡単かな

937

： デフォルトの名無しさん [sage] 2019/02/07(木) 11:59:06.94

:nA5U51xW

>>936

セルの色を変える仕様が実質的に意味あるかが疑問なだけ
意味ないもの検討する必要ないからな

938

： デフォルトの名無しさん [sage] 2019/02/07(木) 12:08:17.49

:nA5U51xW

まあ、意味あることならいくらでも方法がある（各行列のプロパティから幅なんて取れるからな）けど
お題が意味ないこと検討する必要もない

939

： デフォルトの名無しさん [sage] 2019/02/07(木) 13:37:49.53

:JiT+m3d9

数学的な問題でＶＢＡ関係ないんじゃね

940

： デフォルトの名無しさん [sage] 2019/02/07(木) 14:00:56.39

:C6bM/gU/

皆さんありがとうございます
セルで線を引く質問をした者です

セル幅がまちまちのケースは
こちらも想定外でした
均等幅で求められれば良いと
考えていましたから
既に回答して頂いた方法で
試してみたいと思います

どうもありがとうございました

941

： デフォルトの名無しさん [] 2019/02/07(木) 16:33:46.50

:IUpQT5qY

質問です

文字列のカラムと数値のカラムが混在する表
数値カラムは空欄セルもある
この表からセル値をコピーするとき、数値カラムでセルが空欄の時はコピー先を0にしたい
文字列カラムでセルが空欄の時はコピー先も空欄

タイトル名で判定するのはスマートじゃないと思って
セルや変数の仕様を使って上手くできないでしょうか

942

： デフォルトの名無しさん [sage] 2019/02/07(木) 17:12:43.16

:suQqSSWO

セルの書式を1つずつチェックするのが確実

943

： デフォルトの名無しさん [sage] 2019/02/07(木) 17:18:57.62

:nA5U51xW

>>941

これはVBAの質問ですか？
機能はExcelの質問だよ

944

： デフォルトの名無しさん [sage] 2019/02/07(木) 22:22:10.23

:kH7/pekJ

数値カラムの空欄はそのまま空欄で
文字カラムの空欄を長さ0の文字列にしておけばセル参照で

945

： デフォルトの名無しさん [sage] 2019/02/07(木) 23:16:40.13

:o0PdMVgb

1が出てくる回数をそのまま行番号に使って、
1・2・3という数字を、そのまま列番号に使う。

946

： デフォルトの名無しさん [sage] 2019/02/07(木) 23:30:09.71

:nA5U51xW

>>945

それを式で表記すると？

947

： デフォルトの名無しさん [sage] 2019/02/08(金) 00:39:13.26

:nir6IlOg

質問です
C言語のFILEポインタをexternしているdllをvbaから呼び出すときにシグニチャーは何型ですか

948

： デフォルトの名無しさん [sage] 2019/02/08(金) 00:50:45.35

:WrxcLohJ

>>946

ごめん、勘違いしてた。
何とかできたけど、ものすごくダサい。

C列　=COUNTIF(INDIRECT("A1:A"&ROW()),A:A)
D列　=MATCH(ROW(),C:C,0)
E列　=LEFT(F:F&G:G&H:H&I:I&J:J&K:K,FIND("0",F:F&G:G&H:H&I:I&J:J&K:K)-1)
F列　=INDEX($1:$1048576,INDIRECT("D"&ROW())+COLUMN()-6,2)
G列以降　=IF(INDEX($1:$1048576,INDIRECT("D"&ROW())+COLUMN()-7,1)<=INDEX($1:$1048576,INDIRECT("D"&ROW())+COLUMN()-6,1),INDEX($1:$1048576,INDIRECT("D"&ROW())+COLUMN()-6,2),0)

E列が答えだけど、2016なら、ここはCONCATENATEで。

949

： デフォルトの名無しさん [sage] 2019/02/08(金) 01:05:57.02

:WrxcLohJ

↑ごめん、これもなんかおかしいわ。

950

： デフォルトの名無しさん [] 2019/02/08(金) 04:25:07.76

:49YgIYkI

よろしくお願いします。

ある住所リストを宛名印刷するためのVBAを書きました。
印刷したときに、枠に収らないとまずいし、とはいえ町名の途中などで機械的に次の
行になるのもまずいので、途中、全角スペースがあったら次の行にする、という
ことを考えて、名簿リストを入力する係の人に「だいたい○文字目くらいで、市町村名あたりの
キリのいいところで全角スペースを入れておいてください」と頼んでおきました。

Jusho = sheets("名簿").cells.(rowcnt,2)
If InStr(Jusho, "　") Then
　　tmp = Split(Jusho, "　")
Jusho1 = tmp(0)
Jusho2 = tmp(1)
Else
Jusho1 = Jusho0
Jusho2 = " "
End If
sheets("印刷元").range("A1")=Jusho1
sheets("印刷元").range("A2")=Jusho2
sheets("印刷元").printout

こうやって、長い住所を２行に分けることに成功したのですが、
今になって、マンション名やらなんやらで、全角スペースがいくつもある場合があることがわかりました。
つまり、Jusho0に、２つ以上のスペースがある場合が出てきて、そうすると、tmp(2)やtmp(3)が
発生することなってしまい、印刷の住所が途切れてしまうことになりました。
私のVBAの書き方が悪かったのだと思います。

「１つ目のスペースで２つに分ける。２つ目以降のスペースは無視」というVBAを書きたいです。
どうすればよいでしょうか？

951

： デフォルトの名無しさん [sage] 2019/02/08(金) 05:17:51.52

:0dQnaPPd

Ruby で作った

require 'csv'

results = [ ]
# 空白区切りで、ヘッダー有り
options = { :headers => true, col_sep: " " }

# CSV 入力ファイルを、1行ずつ処理する
CSV.foreach( "input.csv", options ) do | row |
if row[ 0 ] == "1"
results.push row[ 1 ] # 要素の追加
else
results[ -1 ] += row[ 1 ] # 最終要素に文字列を連結
end
end

puts results

952

： デフォルトの名無しさん [sage] 2019/02/08(金) 05:23:12.23

:imEPOnT1

tmp = Split(Jusho, "　", 2)

953

： デフォルトの名無しさん [] 2019/02/08(金) 06:20:13.15

:Ec5y9MTZ

Instrは検索文字が文字列の左から何文字目にあるかを返すよ
Instr(“東京都渋谷区ほげほげ町”, “ ”) は4が返ってくるのでそれでSplitする
ちなみに右から調べるInstrRevもある

954

： デフォルトの名無しさん [] 2019/02/08(金) 06:40:44.15

:Ec5y9MTZ

あと検索文字がない場合は0を返すから条件式で使うなら
Instr(Jusyo, “ ”) <> 0 Then にしといた方がいいかも
他の人が見たとき「？」になる

955

： デフォルトの名無しさん [sage] 2019/02/08(金) 07:17:52.94

:SOh8GklL

>>948

やってみた
結果、E列

あい
かきく
さたち
たち

答えは以下が正しいのとG列の式を
H列以降に無限に張らなければいけないのが問題ある
他にも問題があるかもしれないが・・・

あい
かきく
さ
たち

956

： デフォルトの名無しさん [] 2019/02/08(金) 07:21:27.36

:SOh8GklL

>>923

ここで、ヒントを出してるのに
作業列は１列で十分

957

： デフォルトの名無しさん [sage] 2019/02/08(金) 07:26:35.12

:ViZCNFeP

フラッシュ演算のやりとり見てて思ったけど
文字にして答えを文字結合すればアルツハイマーテストに使えるんじゃね？

958

： デフォルトの名無しさん [sage] 2019/02/08(金) 08:20:58.27

:SOh8GklL

>>956

すまん
無理にピボットテーブルや式でやらず
フィルターで列Aが1を表示でいいな

959

： デフォルトの名無しさん [sage] 2019/02/08(金) 11:14:58.05

:SOh8GklL

住所印刷なら、郵便番号が有るだろう
郵便番号の住所変換ルーチンはある
住所は郵便番号と比較すべきで比較してエラーを出すべき
郵便番号に合致する部分を１行目、それ以外を２行目が良いだろ

960

： デフォルトの名無しさん [sage] 2019/02/08(金) 11:46:52.42

:SOh8GklL

>>957

色々使えるだろうね
文字の表示位置を変えてタッチパネルでやるとか
応用範囲は広いがちゃんと全画面表示や文字の大きさ位
自動でできないとな、今時４Kモニターも出てるし・・・

961

： デフォルトの名無しさん [sage] 2019/02/08(金) 12:00:58.70

:CDEogeBV

ttp://https://ux.getuploader.com/dialogues_txt/download/129

limitオプションで回答は出てますが、実用的には長い住所の時は複数回改行も有り得るんではないでしょうか
またフォーマットが変わったときに全ての住所録の全角位置を調整するのが大変だと思われます
なので記入者には単純に単語毎にスペースを入れて貰って、適時自然な位置で改行するのはどうでしょうか

962

： デフォルトの名無しさん [] 2019/02/08(金) 12:14:24.08

:WyTY+E9f

>>961

運用でカバーできたら誰も苦労しないよね

963

： デフォルトの名無しさん [] 2019/02/08(金) 12:19:37.60

:jEYFKApV

自然な位置てなんやねん

964

： デフォルトの名無しさん [sage] 2019/02/08(金) 12:29:29.52

:CDEogeBV

一行の文字数を決めて、そこからInStrRevで最後のスペース位置を検索してLF挿入です
コード書いたんですが何故かブロックされます・・・

965

： デフォルトの名無しさん [sage] 2019/02/08(金) 12:31:14.56

:SOh8GklL

>郵便番号に合致する部分を１行目、それ以外を２行目が良いだろ
２行目があふれても、それは枠内で表示するだけで問題ないだろ
どうせ印刷はWordのあて名書きだろ２行目の表示エリアを広くしておけば問題ない

966

： デフォルトの名無しさん [sage] 2019/02/08(金) 12:35:06.44

:CDEogeBV

拙いですが折角書いたのでうｐしました
外部リンク

>>965

エクセルだと思うし、表示エリアを広くで済むならそもそも改行不要なのでは・・・ 👀
Rock54: Caution(BBR-MD5:669e095291445c5e5f700f06dfd84fd2)

967

： デフォルトの名無しさん [] 2019/02/08(金) 12:59:45.99

:WyTY+E9f

>>965

普通は郵便番号と住所は別カラムだろ
というか質問者は郵便番号の話してないから

968

： デフォルトの名無しさん [sage] 2019/02/08(金) 13:11:41.88

:SOh8GklL

>>967

空想の世界で生きるのも人生
実態を考えるのも人生　好きにしてね
ちなみに、午後だからやばいかも

969

： デフォルトの名無しさん [sage] 2019/02/08(金) 13:14:37.20

:SOh8GklL

>>966

見栄えがあるよな、企業が出すなら
すまないが午後になったのでテストはしてない

970

： デフォルトの名無しさん [] 2019/02/08(金) 13:19:24.26

:WyTY+E9f

>>968

くっさ

971

： デフォルトの名無しさん [sage] 2019/02/08(金) 15:18:18.79

:ZcpxXTEs

>>961

うちのシステムだとテキストボックスが既に３つになってて一段目が市区町村まで、二段目が枝番まで、三段目が物件名と部屋番+様方、会社名とかって決まってる。

972

： デフォルトの名無しさん [sage] 2019/02/08(金) 15:20:53.99

:SOh8GklL

まあ、なんだな住所を２行にしたいなんてあて名書きだけだろ
それって、Wordのあて名書き印刷ぐらい
で、きれいに住所を分けるのは郵便番号に載っている住所で区切るんだよ
それ以外は長いマンション名あるけど適当に範囲内で打てばいいんだよ
今時郵便番号を管理しない住所録もないだろ
まあ、引きこもりにはわからないかもしれないが

973

： デフォルトの名無しさん [sage] 2019/02/08(金) 15:21:19.17

:ZcpxXTEs

>>971

追記、登録する人にはこれで宛名出るからって言ってある。

974

： デフォルトの名無しさん [sage] 2019/02/08(金) 15:21:58.27

:RRS+yeTf

市区町村の名前のDB作ればいいんじゃね

975

： デフォルトの名無しさん [sage] 2019/02/08(金) 15:29:02.53

:SOh8GklL

>>971

お前の所への質問じゃないな
あと、分けて入力するフォームも結構あるが
無視されることも多いだろ
気にしているところは、まず郵便番号を聞くな

976

： デフォルトの名無しさん [sage] 2019/02/08(金) 16:46:02.55

:QatAiOm8