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


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

Excel VBA 質問スレ Part68



1 名前:デフォルトの名無しさん [2020/08/30(日) 11:55:27.33 ID:Oy/VxFsh0.net]
!extend:checked:vvvvv:1000:512
↑同じ内容を2行貼り付ける

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

※前スレ
Excel VBA 質問スレ Part67
https://mevius.5ch.net/test/read.cgi/tech/1593104489/
VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

62 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 10:12:38.88 ID:LyoNVqbOr.net]
A1に3、B1に100といれ、実行すると、

3から100行までを非表示にするマクロお願いします

63 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 13:47:16.04 ID:CLMpHe/Q0.net]
基本技術の試験勉強してるのですが、

https://www.fe-siken.com/kakomon/30_aki/pm13.html

この過去問の設問3のマクロの文章の和訳というか、各行がどんな処理をしているのか日本語で説明できる方いませんか

あと、変数iなんですが、なぜiなんでしょう

よろしくお願いいたします

64 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 14:03:42.79 ID:4XqPsYsKd.net]
ループカウンタ用の変数名はとりあえずiにでもしとこうっていう昔からの名残
細かく言うと整数を表すIntegerのi
i、j、k〜nまで順によく使われる

65 名前:デフォルトの名無しさん (ワッチョイ 0701-zmOT) mailto:sage [2020/09/05(土) 14:08:56 ID:CLMpHe/Q0.net]
>>64
ありがとうございます
特にこだわる深い意味は無いのですね
助かります

66 名前:63 (ワッチョイ 0701-zmOT) mailto:sage [2020/09/05(土) 14:19:36 ID:CLMpHe/Q0.net]
何度もレスしてすいません。
問題の文章とVBAのマクロの文章を照らし合わせて回答をみると何となく答えがわかる気がしてきたのですが、

相対(a2,work_line,3)

がなぜ来店状況ワークシートのセルd列のことになるのか分かりません。
3列目なのでcだと思ったのですが…

67 名前:デフォルトの名無しさん (ササクッテロ Spbb-Yyeh) mailto:sage [2020/09/05(土) 14:51:37 ID:OBeOSrHnp.net]
>>64
indexかと思っていたんだが

68 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 15:12:53.61 ID:JRHWh/h7d.net]
>>66
列番号ではなくA列から相対的に数えて何個右の列かってことだろう

69 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 15:15:25.53 ID:jnQOfSyba.net]
>>66
問題見てもないけど、相対って書いてあるからB列から始めてるんじゃ?
と思ったけどレス見ると3次元配列っぽいしよくわからん

70 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 15:16:40.51 ID:YqeHmb95d.net]
相対(A2,work_line)も同じ考え方だぞ?



71 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 15:19:54.14 ID:Xd3OIwcX0.net]
>>63
fortran起源説

72 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 15:20:15.06 ID:YqeHmb95d.net]
vbaに直すとrange("A2").offset(work_line,3)

73 名前:63 mailto:sage [2020/09/05(土) 16:21:30.22 ID:zirZG8//r.net]
>>68
>>72
ありがとうございます!!
理解しました!

74 名前:63 mailto:sage [2020/09/05(土) 16:23:09.92 ID:ZUfl2WLX0.net]
>>70
すいません
そもそもそれもよく分かってなかったのです。
ちなみに良かったらどういう意味が教えて欲しいです。
聞いてばかりで申し訳ありません。

75 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 16:25:38.15 ID:STsU3nz1r.net]
>>64
インデックスじゃないの?

76 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 16:34:57.30 ID:BMRcPhN/d.net]
>>74
列がわかったなら行もわかるはずだが…

77 名前:デフォルトの名無しさん [2020/09/05(土) 17:24:34.57 ID:wG6iKMy+0.net]
>>74
そろそろ消えろ

78 名前:デフォルトの名無しさん [2020/09/05(土) 17:30:09.65 ID:k1PkCOGDM.net]
>>74
相対(a2,行,列)
0の場合は省略可なので
相対(a2,行)とか相対(a2,,列)でもいい

79 名前:デフォルトの名無しさん (スフッ Sd7f-7sgX) mailto:sage [2020/09/05(土) 17:54:39 ID:HmyJ6FBVd.net]
>>78
それはvbaのoffsetの構文であって設問の問題文とは関係ないな

80 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 18:10:48.71 ID:BBnzOe5t0.net]
>>62
の質問内容がひどすぎて
誰もくいつかないなw



81 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 18:23:56.02 ID:eBP4WmWUa.net]
お金が発生するわけでもないし

82 名前:63 (ワッチョイ 0701-zmOT) mailto:sage [2020/09/05(土) 18:58:31 ID:ZUfl2WLX0.net]
>>78
ありがとうございます。
とても助かりました。

83 名前:デフォルトの名無しさん mailto:sage [2020/09/05(土) 20:42:59.70 ID:XhaSpdgL0.net]
>>62
Range(Rows(Range("A1").Value), Rows(Range("B1").Value)).Rows.Hidden = True

84 名前:デフォルトの名無しさん mailto:sage [2020/09/06(日) 09:47:35.66 ID:cKQMszzk0.net]
>>57
値で貼り付けるなら、後から
.NumberFormatLocal = "yyyy/m/d h:mm;@"

85 名前:デフォルトの名無しさん mailto:sage [2020/09/06(日) 09:49:52.25 ID:cKQMszzk0.net]
>>63
答えは簡単だが、質問が難しすぎる。

86 名前:63 mailto:sage [2020/09/06(日) 14:01:01.76 ID:spMqG8Fw0.net]
>>85
上手く質問できなくて申し訳ありません。

全体的な単語の一つ一つの意味が知りたかったのです。

お手隙ならばで構わないのですが、

https://www.fe-siken.com/kakomon/30_haru/pm02.html

この問題の設問3の重みパラメータというのがどう作用して出力Zの値になるのか教えて頂けないでしょうか。

87 名前:63 mailto:sage [2020/09/06(日) 14:02:20.47 ID:spMqG8Fw0.net]
あ、すみません。問題よく読んでませんでした。
これについてはレス直後理解しました。
ごめんなさい( ;ᯅ; )

88 名前:63 mailto:sage [2020/09/06(日) 14:27:55.58 ID:spMqG8Fw0.net]
https://www.fe-siken.com/kakomon/30_haru/pm03.html

この設問1の答えなんですが、この文でどうして結合とか保護者の氏名と住所を抽出するのですか?

89 名前:デフォルトの名無しさん mailto:sage [2020/09/06(日) 14:33:06.47 ID:PpfBKGYq0.net]
>>84
これで出来ました
ありがとうありがとうありがとううううううううーー

90 名前:デフォルトの名無しさん (ワッチョイ 7f8e-+abr) [2020/09/06(日) 18:43:46 ID:Mql9n0EK0.net]
>>88
死ね



91 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 05:30:38.87 ID:OoqPbQfP0.net]
>>90
お前が死ね
ゴミ山猿の屑野郎

92 名前:デフォルトの名無しさん (ワントンキン MMab-AmFM) mailto:sage [2020/09/07(月) 12:55:41 ID:ZbJzmFKoM.net]
>>91
内容も読まずに書くなよクズ。SQLのことだろうが。

93 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 18:18:17.86 ID:R5ozSk7c0.net]
ここで質問したらダメだったみたいですね
該当スレとかあるのでしょうか

94 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 18:26:10.30 ID:aZP2Fcscd.net]
>>93
egg.5ch.net/test/read.cgi/welfare/1598921138/

95 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 18:43:17.53 ID:K46ocmR8a.net]
>>88
これをどこで聞けばいいのかもわからなかったらFE受かるの難しいよ…

96 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 20:07:21.03 ID:Yu9E5X6OM.net]
VBA勉強しはじめて、ようやくOutlook連携とかzip圧縮とかやり始めたんだけど
Excelそのものの操作に関する情報と比べて、参考に出来る情報の質も量もガクッと落ちた気がする

やっぱ話題のpythonに切替えたほうが悩まずやれるのだろうか

97 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 20:09:11.40 ID:Yu9E5X6OM.net]
質も量も、っていうのはノンプログラマーの自分が探せる範囲って意味です

98 名前:デフォルトの名無しさん [2020/09/07(月) 20:22:49.70 ID:sgrgY4Mk0.net]
zip.exe叩けばええやろ

99 名前:デフォルトの名無しさん (ワッチョイ 5f6d-4jJb) [2020/09/07(月) 20:51:37 ID:/DR3/4oV0.net]
目の前に答えが書いてあっても理解できない、答えだと気付けない
これが「馬鹿には無理」の意味

100 名前:デフォルトの名無しさん (テテンテンテン MM8f-Ccsn) mailto:sage [2020/09/07(月) 21:00:18 ID:Yu9E5X6OM.net]
半年ROMって勉強します押忍押忍押忍



101 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 21:22:51.97 ID:JIC+p5t3M.net]
何をしたいかによるけど、Windowsの操作の自動化っていう範疇ならPowerShellおすすめ
Comオブジェクトも使えるよ

102 名前:デフォルトの名無しさん [2020/09/07(月) 21:38:02.53 ID:J1GBImUha.net]
なにがおかしいの?
Sub func()
Dim url As String: url = "https://e-hentai.org/g/1727798/1fbe77a0a2/"
Dim buffer As String: buffer = ""
Dim objLinks As Object
Dim objIE As InternetExplorer
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = False

objIE.navigate (url)
Do While objIE.Busy Or objIE.readyState <> READYSTATE_COMPLETE
DoEvents
Loop

Call WaitFor(3) ' wait for 3 seconds

objLinks = objIE.document.getElementsByClassName("gdtm").outerHTML

Cells(1, 1).Value = objLinks

objIE.Quit
Set objIE = Nothing
End Sub

Function WaitFor(ByVal second As Integer)
Dim futureTime As Date: futureTime = DateAdd("s", second, Now)
While Now < futureTime
DoEvents
Wend
End Function

103 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 22:46:01.59 ID:qahfABoQ0.net]
IEはもう無くなるよ

104 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 22:49:52.43 ID:744b2nM10.net]
>>102
Dim objLinks As String

105 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 22:54:20.72 ID:VQNIMFGd0.net]
>>103
IEの代替え何使ったらいいの?

106 名前:デフォルトの名無しさん (ワッチョイ 27ce-n8ne) mailto:sage [2020/09/07(月) 23:07:32 ID:744b2nM10.net]
>>105
データをダウンロードするだけならブラウザを使わずに直接ネットアクセスした方が早くて簡単
色んな方法があるけどXMLHTTPとかWinHttpRequestとか調べてみ

107 名前:デフォルトの名無しさん (ワッチョイ bfc9-XrX+) mailto:sage [2020/09/07(月) 23:17:00 ID:VQNIMFGd0.net]
>>106
ありがとうございます


'JavaScriptを実行しFormを送る処理
objIE.Navigate "JavaScript:doAction('/文字列')"

みたいなことしないとアクセスできないサイトのデータが取得したいのですが
他に方法ありますか?

108 名前:デフォルトの名無しさん (ワッチョイ e7e6-n8ne) mailto:sage [2020/09/07(月) 23:22:23 ID:sgrgY4Mk0.net]
JavaScriptを読んで何やってるか調べろ

109 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 23:49:39.86 ID:744b2nM10.net]
>>107
Form送信は単純なHTTPアクセスで代替できるケースが多いから、これもブラウザを使う必要はない
てか、WEBの構造はVBA関係ないし

110 名前:デフォルトの名無しさん mailto:sage [2020/09/07(月) 23:56:10.64 ID:UwONkXQv0.net]
エクセル2010です。
上書き保存時にすべてのシートでA1セルを選択するようにしたいのですが、
Ctrl+S時とボタンのクリックイベントで挙動が違うことにハマってます。
1枚目シートにactiveXコントロールのボタンを配置し、VBAの構成は以下です。
1. シートモジュール : ボタンのクリックイベントにThisworkbook.saveだけを書いています。
2. ThisWorkbookモジュール : beforeSaveイベントで3を呼び出し。
3. 標準モジュール : 全シートのA1セルを選択するSubプロシージャ。ForEachでまわすだけ。

Ctrl+Sの際は2→3でうまくいきます。
ボタン押下の場合は、1→2→3と流れてはいるものの、なぜか各シートがactivateされなず、activeSheet.Range("A1").Selectが働きません。
1のクリックイベントから直接3を呼び出すのは、うまく行きます。

何故このような挙動になるのか分からず数日ハマってます。
どなたか、ご教示よろしくお願いします。



111 名前:デフォルトの名無しさん [2020/09/08(火) 02:03:49.70 ID:weDKADyMM.net]
>>110
for i= activeworkbook.worksheets.count to 1 step -1
apprication.goto activeworkbook.worksheets(i).range("a1")
next i
activeworkbook.save

スマホ打ちだから綴りミスはあるかも

112 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 07:47:00.42 ID:vMdvrooDa.net]
>>110
For eachで全シート回してるならActivateしなくても、
sh.Range("A1")で行けないか?

113 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 07:48:01.88 ID:vMdvrooDa.net]
>>112
間違えたsh.Range("A1").Selectだわ

114 名前:デフォルトの名無しさん (ワッチョイ 27da-XrX+) mailto:sage [2020/09/08(火) 10:40:31 ID:C66iYfBu0.net]
>>110
働かないという場合の原因で以下のことを調べてみ

1.実は働いていたがその後に別の動作をしたため働いていないように見える
2.働こうとしたが、なんらかの異常が出て失敗している
3.その処理が実行されていない(on errorやifの条件、イベント発生していないなど)

115 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 11:03:00.55 ID:0vfIbeP00.net]
>>105
漏れは、yahoo のログインとか、
Ruby, Selenium Webdriver で、ブラウザを自動操作してる

単純なダウンロード・スクレイピングなら、RubyのNokogiri。
外部コマンドなら、curl, wget

116 名前:デフォルトの名無しさん (ラクッペペ MM8f-dQ4P) [2020/09/08(火) 11:52:57 ID:POT3YWITM.net]
Application.EnableEvents=Falseしてるとか?

117 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 16:58:59.99 ID:qXkQmTRa0.net]
“>-1”&i
て書いたときに >-2, >-3... っていうふうに比較値が意図せず負に進むんだけど正の値に足したい場合ってどうすれば良いでしょうか。

118 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 18:39:01.86 ID:p9XW8v7Na.net]
>>117
VBAの挙動の問題

-を文字列、1を数値として認識してる

そもそも、-1をダブルクォーテーションで括ってるのは文字列として-1を認識させたい時のみにするのが基本
なので、ダブルクォーテーションを取ってやれば意図通り動くはず

119 名前:デフォルトの名無しさん [2020/09/08(火) 19:07:42.80 ID:Pjd0b/NhM.net]
へー、そんな挙動するんだ。知らなかった

>-11
>-12
>-13
になると思ってたよ

120 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 19:08:20.88 ID:E23V8S4o0.net]
>>113
activeじゃないシートはselectできないと思うが



121 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 19:10:47.69 ID:E23V8S4o0.net]
>>110
Forの中身が間違ってるとか別のブックを見てるとか
ほんとに選択したいシートが選択されてるか確認した?

122 名前:デフォルトの名無しさん [2020/09/08(火) 20:06:33.41 ID:qXkQmTRa0.net]
>>118
クォーテーション外してやってみたけど上手くいかないです...

初心者なんで拙いですが、一応自分で書いたものをのせます。
既出のデータを整理して2次元チャートを作成する目的です。

Dim cnt As Integer
Dim x As Long
Dim y As Long
x = 0
y = 0

For x = 0 To 10
For y = 0 To 10

cnt = WorksheetFunction.CountIfs(Range("B2", Range("B2").End(xlDown)) "<=" 0 + x, Range("B2", Range("B2").End(xlDown)) ">= -1" & x, Range("C2", Range("C2").End(xlDown)) "<= 0" & y, Range("C2", Range("C2").End(xlDown)) ">= -1" & y)

Cells(x , y) = cnt

Next y
Next x

123 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 20:34:38.38 ID:E23V8S4o0.net]
いつも人任せだな…
そのcountifの引数の中身が自分の意図した内容かなんで確認しないの?

124 名前:デフォルトの名無しさん (ワッチョイ 5fb5-/qgI) mailto:sage [2020/09/08(火) 21:43:07 ID:MiWYYVaX0.net]
もう30過ぎて勉強もなぁ…って手が進まない
VBAを知識をパンパンに詰め込んでああこれねって感じでカタカタと打ち込んでプロシージャ作りたいもんだわ

125 名前:デフォルトの名無しさん (ワッチョイ e77c-ALHH) mailto:sage [2020/09/08(火) 21:57:43 ID:E23V8S4o0.net]
考えることを人に丸投げしてるだけで勉強は関係がない

126 名前:デフォルトの名無しさん (ワッチョイ 5fb5-/qgI) mailto:sage [2020/09/08(火) 22:00:12 ID:MiWYYVaX0.net]
人に丸投げというかネットで拾ったものの組み合わせでいつも何とかしてしまう
知識がほとんど入らない
異動希望出してるしなぁ

127 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 22:06:16.19 ID:aT8iqlgZ0.net]
エクセルの指定列から3列コピーしてその4列目に挿入して貼り付けた後セルに入ってる値を消すコードをRangeじゃなくてCellsでやりたいです。
clmtar=10
10〜13列をコピー
14列目に挿入
14〜17列目のセルの値クリア。

128 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 22:11:08.52 ID:+kf0/gdp0.net]
>>127
コピー後の値を消すの?
元通りになるだけだと思うけど

129 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 22:29:42.46 ID:C66iYfBu0.net]
>>126
愚痴る暇があったら入門書かって1ページでもいいから読んでろ

130 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 22:34:56.39 ID:MiWYYVaX0.net]
>>129
すんません…なんか職場でおばちゃんがあれも作ってとか調子こいてるだけで
こりゃまた愚痴だわ
これぞ!っていう入門書ありますかね
イチからガチで鍛えてみるかな



131 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 22:36:08.93 ID:8mxHLcBxa.net]
>>126
なんとかできてるならそれも実力のうちなのだと思うよ
楽しい、自分ならこうしてみたい、こうしたらどうなるのだろう
とかがないならそこまでだけど

132 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 22:40:05.68 ID:MiWYYVaX0.net]
ネットで検索
プロシージャを組み合わせたり簡単なところをイジる
出きたと思ったら会社のメルアドにプロシージャ貼り付けたテキスト送る
会社で組み合わせる
UserFormのボタンに割り当て
これでごまかしつつやってきた
圧倒的な知識が欲しいなぁと

133 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 22:47:12.09 ID:C66iYfBu0.net]
>>130
それすら他人に頼るようじゃいつまでたっても進まない

134 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 22:50:54.91 ID:E23V8S4o0.net]
今までどおり困ったら初心者ですとか勉強中ですとかで知識ないアピールで人にやらせて突っ込まれたら謎の正当化とどうでもいい言い訳で誤魔化してやっていくんだろうな

135 名前:デフォルトの名無しさん mailto:sage [2020/09/08(火) 22:52:28.72 ID:MiWYYVaX0.net]
ネットで調べてなんとかなってしまう時代のせいだよね
俺は悪くない

136 名前:デフォルトの名無しさん (アウアウウー Sa8b-yCsQ) mailto:sage [2020/09/08(火) 23:27:06 ID:HhRrDF1oa.net]
そういう人が増えてきたからあんまり教えないようにしてる

137 名前:デフォルトの名無しさん [2020/09/09(水) 00:19:56.45 ID:akgtbWjMM.net]
ゆとり世代の特徴だぞ

138 名前:110 mailto:sage [2020/09/09(水) 00:23:30.44 ID:Lvk20igu0.net]
>110です。
書き込み後にいろいろググったところ、いくつかのサイトで
コードからの保存はbeforeSaveイベントが正常に働かない旨の記載がありました。
今回の事象もこれに当たるのかなと考えています。
そんな訳で、ボタンでの保存はenableEventsをfalseにして別処理にしました。
回答くださった皆様、ありがとうございました。

139 名前:デフォルトの名無しさん (ワッチョイ eab5-mjPJ) mailto:sage [2020/09/09(水) 00:53:57 ID:0o8c0VF10.net]
別にここで聞いても答えなんて返ってこないし期待してないのでご安心を

140 名前:デフォルトの名無しさん (ワッチョイ 39e6-Pwf7) [2020/09/09(水) 01:12:42 ID:VoppH/up0.net]
足し算がわかりませんとか言われても入門書でも読めとしか言えないよな



141 名前:デフォルトの名無しさん mailto:sage [2020/09/09(水) 04:06:45.89 ID:Y+JI74HRa.net]
入門書読めと言うとどの入門書がいいか聞いてくるよ

142 名前:デフォルトの名無しさん mailto:sage [2020/09/09(水) 08:19:04.77 ID:z9RILJ2v0.net]
入門書を紹介すると今度はどこで買えばいいか聞いてくるよ

143 名前:デフォルトの名無しさん mailto:sage [2020/09/09(水) 09:27:32.52 ID:8tppu1V70.net]
通販で買えって言うとお金がないって言ってくるよ

144 名前:デフォルトの名無しさん mailto:sage [2020/09/09(水) 09:43:27.85 ID:9AZapVJXM.net]
お金あげると姿をくらますよ

145 名前:デフォルトの名無しさん (ワッチョイ 397c-bL/7) mailto:sage [2020/09/09(水) 10:03:14 ID:I5K9tGVf0.net]
しかも捨て台詞付きで

146 名前:デフォルトの名無しさん mailto:sage [2020/09/09(水) 10:37:20.74 ID:KbsHkxtjM.net]
すみません。ちょっと長くなってしまうのですがTreeViewをいじっているうちに分からない事があったので教えて下さい。
TreeViewの子ノードをD&Dでリストボックスにコピーする動作を作っていたのですが、ドラッグ開始時点のSelectedItemを取得しようとすると1度子ノードをクリックした上でD&Dを行う必要がありました。
その為、既定引数のIPOS,yPOSを使ってHitTestをSelectedItemに代入しようとしました。
しかしそれが上手く動作せず色々調べた結果、
xとyに*15をすると言う記述を見つけ試してみたところ、思い通りの動作を得られました。

しかしながらこの15はなんの15なんだ。他の環境ではこの数値は変わるのか。変わるならば何を元に算出すれば良いのだろうか。
という疑問が浮かびました。
お手数をお掛け致しますがお分かりになる方がいらっしゃいましたらご教授頂けませんでしょうか。

147 名前:デフォルトの名無しさん (ワッチョイ 6a2f-sa+Q) mailto:sage [2020/09/09(水) 14:26:55 ID:dKuEV/F30.net]
まずその15をかけるってどこに書いてあったんだよ

148 名前:デフォルトの名無しさん (アウアウカー Sa55-hUiG) mailto:sage [2020/09/09(水) 16:31:31 ID:0Qh2iKtEa.net]
Windows標準のシステム解像度だとピクセルとTwipsの比率が1:15だからってスタックオーバーフローに書いてあった

149 名前:デフォルトの名無しさん (ラクッペペ MM3e-AH3D) [2020/09/09(水) 17:07:35 ID:cdbk3sfrM.net]
c言語のdefineに相当する文法は無いですか?
constだと違和感がありますので

150 名前:デフォルトの名無しさん (ブーイモ MM8e-+eY2) mailto:sage [2020/09/09(水) 17:36:02 ID:KbsHkxtjM.net]
>>148
助かります
ありがとうございました

という事は使用環境次第では正常に動作しない場合も有り得るって事なのですね。対策を検討してみます。



151 名前:デフォルトの名無しさん mailto:sage [2020/09/09(水) 17:50:55.91 ID:jCqtOC3ba.net]
>>149
どこに違和感があるのかを言わないと案を出せません

152 名前:デフォルトの名無しさん (ワッチョイ 2a1f-ah1O) mailto:sage [2020/09/09(水) 20:59:39 ID:ynJDkc680.net]
>>128
コピー後挿入したら隣に3列追加されてセルの長さもコピーした3列と同じになりますよね?

153 名前:デフォルトの名無しさん (ワッチョイ 397c-bL/7) mailto:sage [2020/09/09(水) 21:05:53 ID:I5K9tGVf0.net]
列幅をコピーすればいいのでは…

154 名前:デフォルトの名無しさん (ワッチョイ 3d3d-PnJR) mailto:sage [2020/09/09(水) 21:18:50 ID:Uey8EdNp0.net]
>>152
幅を一緒にしたいなら最初からそう書けば良かったのに

155 名前:デフォルトの名無しさん (ワッチョイ a95f-Sism) [2020/09/10(木) 00:02:31 ID:a+RPoaYl0.net]
>>149
あなたが思っているC言語のdefineの使い方は、コンパイラが置換するもので、定数の概念とは少し違いますよ?

156 名前:デフォルトの名無しさん [2020/09/10(木) 00:04:04.82 ID:a+RPoaYl0.net]
>>152
そもそも列の挿入操作が必須なのか?

157 名前:デフォルトの名無しさん [2020/09/10(木) 00:05:42.63 ID:a+RPoaYl0.net]
列の挿入なんてあちこちに影響するから、やりたがる理由がわからない。

158 名前:デフォルトの名無しさん (アウアウウー Sa21-zN8f) mailto:sage [2020/09/10(木) 01:40:18 ID:JZj4+m/Aa.net]
条件付き書式が壊れたりすると面倒

159 名前:デフォルトの名無しさん (ワッチョイ a95f-Sism) [2020/09/10(木) 02:24:17 ID:a+RPoaYl0.net]
自分の操作と同じ手順を踏みたいだけなんだろうね

プログラマではない素人感覚

160 名前:デフォルトの名無しさん [2020/09/10(木) 04:18:44.38 ID:026ADmyCa.net]
test



161 名前:デフォルトの名無しさん (ブーイモ MM8e-4twR) mailto:sage [2020/09/10(木) 07:50:51 ID:T4cQI13RM.net]
超初心者なんだけど
配列の中から指定値の近似値の座標を検索するのにいい感じの方法はないでしょうか
(以下、以上、完全一致全て含めての近似値)

162 名前:デフォルトの名無しさん [2020/09/10(木) 08:50:52.35 ID:l+lun8zfM.net]
どうせ大した数じゃないんだろ
総なめしろよ






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

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

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