[過去ﾛｸﾞ] Excel VBA 質問スレ Part68 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
576: (ﾜｯﾁｮｲ 9f63-F9zC) 2020/10/15(木)08:49 ID:wrF56cyr0(2/2) AAS
ソースを最小にするためところどころコメントアウトしてます
Dim objAcroApp As Acrobat.AcroApp
Dim objAcroAVDoc As Acrobat.AcroAVDoc
' Dim objAcroPDDoc As Acrobat.AcroPDDoc
Dim id As Long
' Dim js As Object
' Dim SaveName As String
Set objAcroApp = CreateObject( "AcroExch.App" )
Set objAcroAVDoc = CreateObject( "AcroExch.AVDoc" )
id = objAcroApp.Show
省15
577: (ﾜｯﾁｮｲ 5b2c-F9zC) 2020/10/15(木)09:20 ID:7eWumHpU0(1/2) AAS
起動設定で、プロセスを殺すと、また再起動するアプリがある。
ウィルスチェックなどの、何かをチェックするアプリ
必ず、最低1つは起動しておくタイプのアプリ
そういうアプリは使わない方がよい。
何をチェックして、本社に送っているか、怪しい
会社に問い合わせて、再起動を止めるような設定を聞けば？
578: (ｽﾌﾟﾌﾟ Sdbf-K5sQ) 2020/10/15(木)10:57 ID:LAL4jdY0d(1) AAS
区分1〜10のデータが記録されたcsvを区分ごとにExcelシート毎(シート名は1〜10)に分割して読み込むvbaがどうしても出来ません…
ご教示いただけないでしょうか…
579: (ﾜｯﾁｮｲ 5b49-fMdf) 2020/10/15(木)11:36 ID:+kinuzul0(1) AAS
そんな説明でわかるわけがないので、
そこまで頑張って作ったコードとエラーメッセージを提示するのが最低限
そして、自分で何を試行したのかも説明すること
580: (ﾜﾝﾄﾝｷﾝ MMbf-QVAX) 2020/10/15(木)12:20 ID:k/WlCRMPM(1) AAS
いつもの人
581(1): (ﾜｯﾁｮｲ 5b2c-F9zC) 2020/10/15(木)13:02 ID:7eWumHpU0(2/2) AAS
Ruby なら、これで最初の列だけを、出力できる
require 'csv'
# CSV ファイルを、1行ずつ処理する
CSV.foreach( "a.csv" ) do |row|
puts row[ 0 ]
end
582: (ﾜｯﾁｮｲ 9f6d-sSL1) 2020/10/15(木)14:36 ID:sVQ5bVjI0(1) AAS
>>581
C#スレで恥を晒したRuby荒らしは帰れよ
583(1): (ﾜｯﾁｮｲ 8bda-fMdf) 2020/10/15(木)19:36 ID:GQ796pt70(1) AAS
簡単かどうかなんてどうでもいい。
200万件のデータをADO+SQLより速く処理できるならRuby使ってやらなくもないが。
どうなんだい?
無理ならイラネ。
584: (ﾜｯﾁｮｲ 9fb5-K72c) 2020/10/15(木)19:54 ID:hF5+vxPB0(1) AAS
もう時代遅れなのはわかってるけど
会社が2019に更新してまだまだ使う気満々なので
そして配布が出来ないと困る
585: (ﾃﾃﾝﾃﾝﾃﾝ MM7f-RGwm) 2020/10/15(木)21:24 ID:Dg+UC/FqM(1) AAS
>>583
ルビ糞基地外の味方をするつもりはないけど、DBがボトルネックならRubyだろうが何だろうが速さは変わらんよ
586: (ﾜｯﾁｮｲ 9fe6-lr1q) 2020/10/15(木)21:53 ID:3DKNzMNt0(1) AAS
俺の解釈だとこんな感じ
Sub Macro1(Filename, Fieldname)
Set ws = Workbooks.Open(Filename).Sheets(1)
Set pvt = ws.PivotTableWizard(1, ws.UsedRange)
pvt.PivotFields(Fieldname).Orientation = 1
pvt.PivotFields(Fieldname).Orientation = 4
pvt.ColumnGrand = False
For Each r In pvt.DataBodyRange: r.ShowDetail = True: Next
End Sub
587(1): (ﾜｯﾁｮｲ fb19-F9zC) 2020/10/15(木)23:19 ID:fOL5OZab0(1) AAS
>>562
はこのサイトかな
外部ﾘﾝｸ:pdf-file.nnn2.com
588: (ﾜｯﾁｮｲ 8bda-fMdf) 2020/10/16(金)19:09 ID:Hr39/iau0(1/2) AAS
>>587
多分それ。
589: (ﾜｯﾁｮｲ bb5f-snog) 2020/10/16(金)19:55 ID:rggqlWcj0(1) AAS
PDFファイルの件は、マクロの記録でやるとどうなるのか、確認すればいいんじゃないの？
590: (ﾜｯﾁｮｲ 8bda-fMdf) 2020/10/16(金)21:55 ID:Hr39/iau0(2/2) AAS
なあそれ、マクロの記録をするとどうなるか確認してから言ってるのか?
591: (ﾜｯﾁｮｲ 9f42-B8Ym) 2020/10/16(金)22:07 ID:9Da+1I/Z0(1) AAS
モチのロンだぜ
592: (ﾜｯﾁｮｲ 5bda-fMdf) 2020/10/16(金)22:24 ID:tI22s9TB0(1) AAS
モロのチンだぜ
593: (ｽｯﾌﾟ Sdbf-huX3) 2020/10/18(日)16:09 ID:SMfw56kvd(1) AAS
>>533
そういうことじゃねえ。
594: (ﾜｯﾁｮｲ 05da-tMQb) 2020/10/21(水)23:21 ID:w3Ug/D8p0(1) AAS
画像ﾘﾝｸ[jpg]:i.pinimg.com
595: (ﾃﾃﾝﾃﾝﾃﾝ MMe6-B6QP) 2020/10/22(木)03:14 ID:RxEiNjgnM(1) AAS
AA省
上下前次1-新書関写板覧索設栞歴
あと 407 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.025s