[過去ﾛｸﾞ] VBAなんでも質問スレ Part2 [転載禁止]©2ch.net (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
842: 2019/05/15(水)02:24 ID:MwugOkQt(1/3) AAS
なんか例のCプログラマがしつこいけど、いまどき関係ない別プロセスがメモリ上の値を書き換えたりするミスは、OSレベルでもCPUレベルでもあるので、持論を批判されていると思って反論しなくていいよ。
ここは漠然としたVBAのスレッドだから、見ているひとにはあなたの言うことは難しくて理解できないと思うよ。
スルー力がないのか、寂しくてかまってほしいのか知らないけど、要はクソコードを書くなと言ってるだけだ。
843: 2019/05/15(水)02:28 ID:MwugOkQt(2/3) AAS
なんでVBAスレで組み込み系のショボいハードウェアでのプログラミングを語っているのか？
ハードウェア、OS、ミドルウェア、プログラミング言語によって考え方やどこまで想定するのかは全然、違うからいっしょくたにしないでもらいたい。
844: 2019/05/15(水)02:29 ID:O3OiMSIx(1) AAS
一般ユーザー権限のアプリで別プロセスのメモリにアクセスできたのは、平成どころか昭和時代の話ですよ、おじいちゃん
希にOSやCPUのバグ騒ぎが起きますが、そんなのは例外中の例外なんで普通は気にしなくていいことです
845: 2019/05/15(水)02:37 ID:MwugOkQt(3/3) AAS
Windows 95、98、98SE、MeがいつのOSかもわからないのか
846: 2019/05/15(水)05:12 ID:TahQLJDH(1) AAS
そこまでわかってるのに、タチの悪いやつだな
847: 2019/05/15(水)16:00 ID:D3RbfE7K(1) AAS
イベント用インスタンスはPublicでやるの？
848(1): 2019/05/15(水)20:12 ID:XVltvZnu(1) AAS
せっかくのイベントなのにPrivateにしたら星飛雄馬のクリスマスパーティーみたいになるじゃん
849: 2019/05/15(水)20:14 ID:RIeke8Yt(1) AAS
>>848
座蒲団3枚あげる
850(1): 2019/05/15(水)20:49 ID:WHH9UP0v(1) AAS
何か面白いこと言った？
全然わからない。
興味あるからなぜ面白いか教えて？
851: 2019/05/16(木)02:08 ID:Ab5DOH6n(1) AAS
>>850
ニコ動
動画ﾘﾝｸ[ﾆｺﾆｺ動画]
852(1): 2019/05/16(木)14:30 ID:wWtnEH3A(1/2) AAS
コード書く画面を
背景は黒に、文字は白に、する方法を教えれ
853(1): 2019/05/16(木)17:24 ID:EX4VaMcQ(1) AAS
>>852
ダークテーマと天に向かって３回唱える
854: 2019/05/16(木)17:37 ID:wWtnEH3A(2/2) AAS
>>853
知っておる
2chｽﾚ:tech
下がってよいぞ
855(1): 2019/05/23(木)22:41 ID:ufKYoT27(1/2) AAS
Wordで文字置換をしたいのですが、特定のフォントの文字列を検索して、文字列は変えずにフォントだけ変えたいです。半角を全角にしたいのですが可能でしょうか。ヒントだけでも教えていただけると有り難いです。
856(1): 2019/05/23(木)23:01 ID:ubNtK04k(1) AAS
>>855
できる
任意のRangeのCharactersのフォントを一字ずつ調べて、探しているフォントが適用されている文字が見つかったらその文字のフォントを修正すればいい
半角から全角に変換するにはStrConv関数を使用し、第２引数conversionには列挙定数のvbWideを指定する
857(1): 2019/05/23(木)23:16 ID:fmz+6NIG(1) AAS
wordの標準機能で半角全角変換あったような
858: 2019/05/23(木)23:29 ID:ufKYoT27(2/2) AAS
>>856
ありがとうございます！
やってみます。
>>857
上手くいかなかったと思います。。
859(4): 859 2019/05/28(火)16:00 ID:JWvhlEsx(1/2) AA×
860(1): 859 2019/05/28(火)16:01 ID:JWvhlEsx(2/2) AAS
859の続き
Sub Find()
Dim temp As Range, tempAddress As String, i As Long
With Range("A1").CurrentRegion.Resize(, 1).Offset(, 2)
Set temp = .Find(what:=“たろう”)
If Not temp Is Nothing Then
tempAddress = temp.Address
i = Cells(Rows.Count, "E").End(xlUp).Row
Do
temp.Offset(columnoffset:=-2).Resize(, 3).copy Cells(i, "E")
Set temp = .FindNext(temp)
Loop While temp.Address <> tempAddress
End If
End With
End Sub
Sub copy()
Range("A:G").Clear
Worksheets("template").Range("A1:C7").copy Destination:=Worksheets("Sheet1").Range("A1")
End Sub
861(3): 2019/05/28(火)16:38 ID:Z4r31Ymp(1/2) AAS
>>860
i=i+1 が抜けてるだけじゃね？
862: 2019/05/28(火)16:40 ID:Z4r31Ymp(2/2) AAS
>>861
それと、行や列用の変数として r c 使ってもええんやで
863: 859 2019/05/28(火)17:30 ID:xKlK3b52(1/2) AAS
>>861
ファッ！それかも！
マジでありがとうです！
何かあったらまた聞きます
ホントありがとう、頭いい人！
864(2): 2019/05/28(火)18:33 ID:1J9FOJWe(1) AAS
初心者です。
Wordのユーザーフォームを作りたいのですがExcelの書籍しかなくて詰みました。
Excelのセル番地『A1』に相当するのが『ActiveDocument .tables (1) .cell (1.1)』というところまで突き止めて、
とりあえずテキストボックスに打ち込んだ文字列をセルに転記するところまではできたのですが、それ以上のことができません。
例えば繰り返し同じフォームを使う前提で、古いデータを削除したい時、Excelならば
『Range("A1") .CleanContents』で済むっぽい(うろ覚え)ですが
これをActiveDocumentで再現するにはどうすればよいでしょうか。
まだ文法など全く理解できていませんが、素人目に『Range(”ActiveDocument .tables (1) .cell (1.1)”).Select .CleanContents』
などと書いてしまいたい訳です(当然、動きませんでした)
加えて、WordVBAを中心にお勧めの書籍などありましたら教えていただきたいです。
今の書籍は痒いところに手が届かず…
865: 859 2019/05/28(火)19:44 ID:xKlK3b52(2/2) AAS
>>861
set temp = .findnext(temp)の下に
i=i+1を入れた所、できました。
本当にありがとう！助かりました(T^T)
866: 2019/05/29(水)00:12 ID:S0wmSPvZ(1) AAS
>>864
定番は「最速攻略 Word マクロ / VBA徹底入門」
Word VBAの書籍やWEBサイトは選択肢が圧倒的に少ないから、基本がわかったらVBEのオブジェクトブラウザやネットでMSDNを見た方が確実
867: 2019/05/29(水)09:29 ID:YAhbpcsl(1/3) AAS
学校でVBAを勉強した方はどんな参考で勉強したんでしょうか？
868: 2019/05/29(水)09:30 ID:YAhbpcsl(2/3) AAS
×参考
◯参考書
869: 2019/05/29(水)09:32 ID:YAhbpcsl(3/3) AAS
書籍の名前聞いてみたい
870(1): 2019/05/30(木)15:12 ID:V/L1IaNJ(1) AAS
>>Wordのユーザーフォーム
必要性が今一分からん
871(1): 2019/05/30(木)18:04 ID:2aR1E9YD(1/5) AAS
Wordは機能拡張に凝り出すと面白いよ
上下前次1-新書関写板覧索設栞歴
あと 131 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ
ぬこの手 ぬこTOP 0.031s