20/10/24 13:45:51.01 9i+KquaLM.net
>>641
同じ長さになることはありません
説明不足ですみません
654:デフォルトの名無しさん
20/10/24 13:46:27.15 EYzilKe/0.net
何を条件にした楽なのか？
655:デフォルトの名無しさん
20/10/24 15:19:09.43 hS/lv/UK0.net
ファイル名のことなんてあとで考えればよい。
まず手順を考えてください。
ファイル名は重要ではありません。
656:デフォルトの名無しさん
20/10/24 15:29:59.50 VJA5Q+pD0.net
いつものあいつっぽい
657:デフォルトの名無しさん
20/10/24 15:59:31.92 h35l0z5Z0.net
シート"土曜日の小計"のＡ２から、祝日と会社の休業日以外の土曜日を書いていくマクロを考えています。
（シートカレンダーのＡ列に日付、Ｂ列にＡ列の日付が祝日であれば"1"が入力してあり、Ｃ列に会社の休業日なら"１"が入力してあります）
このマクロだと、「424 オブジェクトが必要です」になります。どう書けば良いですか？
Dim a As Long,r As Long
a = 2
For r = 1 To 365
If Weekday(DateAdd("d", r, Date)) = 7 And _
Worksheet.Function.VLookup(DateAdd("d", r, Date), Sheets("カレンダー"), 2, False) <> 1 And _
Worksheet.Function.VLookup(DateAdd("d", r, Date), Sheets("カレンダー"), 3, False) <> 1 Then
Sheets("土曜日の小計").Cells(a, 1) = DateAdd("d",r,Date)
a = a + 1
End If
Next bc
658:デフォルトの名無しさん
20/10/24 17:14:11.51 hS/lv/UK0.net
>>652
URLﾘﾝｸ(officetanaka.net)
659:デフォルトの名無しさん
20/10/24 17:16:31.42 hS/lv/UK0.net
>>652
可読性の悪さw
660:デフォルトの名無しさん
20/10/24 17:22:25.13 VJA5Q+pD0.net
土曜日のことを聞いていたのは例のあいつ
661:デフォルトの名無しさん
20/10/24 17:24:29.58 hS/lv/UK0.net
>>652
どのワークシートなのか指定がないけど？
662:デフォルトの名無しさん
20/10/24 19:06:56.46 kz7Ernxq0.net
例のあいつが好きな人か
663:デフォルトの名無しさん
20/10/24 19:44:26.47 EYzilKe/0.net
オブジェクトの指定も無いし存在しない命令も書いてあるし
664:デフォルトの名無しさん
20/10/24 19:53:11.40 rvK7EvYrd.net
>>610
個別的になるが出来る。
Application.VBE.ActiveVBProject.References.AddFromFileを使う。
VBEを弄るからセキュリティがザルだ。
わかってる奴以外は使わないことをお勧めする。
665:デフォルトの名無しさん
20/10/24 20:28:18.61 UZJZIrrqM.net
>>652
Sheets("カレンダー")のあとにセル範囲を書けば動くんじゃね
666:デフォルトの名無しさん
20/10/24 21:19:11.38 9VZVkXWLd.net
理解しないまま適当にいじって、エラーが出る位置を見直そうともせず修正丸投げか
667:デフォルトの名無しさん
20/10/24 23:09:15.96 ZLw1Oaa2M.net
だっていつもの人だもの
668:652
20/10/24 23:35:43.13 h35l0z5Z0.net
>>653
どこにＳｅｔをつければいいか分かりません
>>652
どうやって指定すればいいですか？
>>660
Worksheet.Function.VLookup(DateAdd("d", r, Date), Sheets("カレンダー").Range("A:C"), 2, False) <> 1
でも同じでした
669:デフォルトの名無しさん
20/10/25 01:39:45.83 eXluQ9/t0.net
うるさい
670:デフォルトの名無しさん
20/10/25 02:05:19.43 mQ0mp2TEM.net
>>663
いい加減にしろや
死ね
671:デフォルトの名無しさん
20/10/25 11:43:41.49 R1nDOxYO0.net
>>663
基本的なことができてないようなので職場の他の人に頼んだ方が早いだろう
672:デフォルトの名無しさん
20/10/25 12:51:32.04 6oKLzf6v0.net
ある変数に、なんでもいいから100文字セットしたい場合って
どの関数使えばいいの？
str = "*****..."(100文字)
と書くのはダサいから嫌です
673:デフォルトの名無しさん
20/10/25 12:58:10.18 cOgZifE90.net
ダサいとする基準は？
674:デフォルトの名無しさん
20/10/25 13:44:52.27 eJOhPHQ60.net
>>667
WorksheetFunction.Rept("あ" ,100)
675:デフォルトの名無しさん
20/10/25 14:25:26.14 f7KUnMgPd.net
>>667
String(255,"*")
676:デフォルトの名無しさん
20/10/25 14:26:14.56 f7KUnMgPd.net
100文字か。
String(100,"*")
677:デフォルトの名無しさん
20/10/25 14:53:37.82 SDXJVscja.net
>>667
その質問のほうがダサい
678:デフォルトの名無しさん
20/10/25 17:29:34.56 6oKLzf6v0.net
>667
です
669-671
おかげさまでできました有難う天才たち
679:デフォルトの名無しさん
20/10/25 19:06:05.20 DNLjJymIM.net
やっぱりいつものあいつでしたとさ
680:デフォルトの名無しさん
20/10/25 19:23:20.13 eXluQ9/t0.net
なんでもいいという要件がわからない。
681:デフォルトの名無しさん
20/10/25 20:13:10.48 R1nDOxYO0.net
からかわれている
682:デフォルトの名無しさん
20/10/25 20:37:35.14 cOgZifE90.net
というかバカにされてるなたぶん
683:デフォルトの名無しさん
20/10/25 21:38:09.03 eeV8PNBf0.net
複数行まとめてコメントアウトしたい場合
どう書けばいいですか
一行ずつ'を入れたくないです。
684:デフォルトの名無しさん
20/10/25 22:03:05.56 D3cPjOx/a.net
選択されたら行範囲をすべてコメント化/コメント解除はツールバーにある
そのバーが非表示だと表示しなければダメだが
あと、推奨されるかは分からないけど、
#if 0 then
コメント化したい行
#end if
とかよくやります
685:デフォルトの名無しさん
20/10/25 22:04:11.05 D3cPjOx/a.net
出だし
選択された行範囲…
です
686:デフォルトの名無しさん
20/10/25 22:18:31.00 D3cPjOx/a.net
自分で書いておいてなんだけど、#でぃれくてぃぶによるコメントはお勧めしません
知っておいてよいかも、で
687:デフォルトの名無しさん
20/10/25 23:22:51.95 JTBNO/Ek0.net
>>678
行の末尾に半角スペースとアンダーバーを入れて次の行と繋げてしまうとか？
688:デフォルトの名無しさん
20/10/26 00:23:04.45 qmNjcSj20.net
>>678
数行程度の編集作業で手を抜くってのはどうかな
むしろそのコメント残さないで削除した方がいいんじゃね
一時的に処理を分けるならプロシージャとかで追い出して呼び出し部分をコメントにするとかあるけど
689:デフォルトの名無しさん
20/10/26 12:01:16.14 fNFJMgyU0.net
>>678 は釣り
690:デフォルトの名無しさん
20/10/26 14:18:17.78 qmNjcSj20.net
やっぱりそうか
691:デフォルトの名無しさん
20/10/26 22:12:59.62 jYeoL4370.net
元々スプレットシート使ってて最近vba始めたんだけど
エクセルのvbaではスプレットシートで言うとこのsetvaluesみたいなのはないの？
2次配列をシートに貼り付けるみたいなことしたいんだけど
692:デフォルトの名無しさん
20/10/26 22:13:37.01 jYeoL4370.net
２次配列じゃなくて多次元配列でした
693:デフォルトの名無しさん
20/10/26 22:18:23.63 LUihbr1y0.net
>>687
VBAは2次元配列限定でRangeに代入すればまとめて書き込んだり読み取ったりできる
694:デフォルトの名無しさん
20/10/27 00:26:27.42 bFDGidnH0.net
VBAはなぜか裏技っぽい文法が好きらしい
Midステートメントなんて最悪
695:デフォルトの名無しさん
20/10/27 01:13:56.57 86zqMFTdM.net
>>686
>>689
釣られないように
696:デフォルトの名無しさん
20/10/27 02:21:37.66 rqaBQIGU0.net
>>688
何度もすいません
例えばこんな感じでrangeの範囲がわからない場合rangeのとこどうしたらいいの？
dim tmp
tmp = worksheets("sheet1").usedrange
worksheets("sheet2").range()= tmp
697:デフォルトの名無しさん
20/10/27 02:24:20.74 rqaBQIGU0.net
ソース間違いです
dim tmp
tmp = worksheets("sheet1").usedrange.value
Worksheets("sheet2").range()= tmp
698:デフォルトの名無しさん
20/10/27 02:30:47.78 9HNq6CFYd.net
例のあいつ
699:デフォルトの名無しさん
20/10/27 11:38:27.45 ptoZa2VhM.net
Wordの2ページ目以降にラベルを追加する方法について教えてください
エクセルからWordを呼び出して、ラベルを追加しようとしています
以下のように記載しました
Set newDoc wdApp.Documents. Add
newDoc.Shapes.AddLabel msoTextOrientationHorizontal, 35, 300, 30, 20
AddLabelの第二引数(300になっているところ)を増やせば2ページ目以降に追加されると思いましたが消えてしまい上手くいきません
すみませんがどうすればいいかご教示お願いいたします
700:デフォルトの名無しさん
20/10/27 12:32:20.10 g67UH/S6d.net
>>692
それ、Rangeの範囲わかるよね。
701:デフォルトの名無しさん
20/10/27 16:07:03.53 rqaBQIGU0.net
>>695
わからない場合です
いちおうuboundとかで出せるのは分かるけど流石にこれだと増長すぎるかなと
worksheets("sheet2").range(cells(1,1),cells(ubound(tmp),ubound(tmp,2))) = tmp
702:デフォルトの名無しさん
20/10/27 18:11:55.01 l1bcXJEN0.net
VBAを使うには記述の冗長さは諦めたほうがいい
その書き方で大正解だ
703:デフォルトの名無しさん
20/10/27 18:13:10.53 l1bcXJEN0.net
VBAの何が終わってるってこう言う書き方に少しも疑問を覚えない老害がいっぱいいるんだよな
704:デフォルトの名無しさん
20/10/27 18:22:43.09 qZwcfAyua.net
一旦変数にいれればいいんじゃね
705:デフォルトの名無しさん
20/10/27 18:42:07.59 6WpiGXJ0M.net
疑問に思ったところでどうしようも無く無いか
自分でクラスでも作るとか？
706:デフォルトの名無しさん
20/10/27 18:50:59.46 D9T+kNV20.net
冗長にしたくなければテーブル使うのが1番手っ取り早いかなぁ
プロパティの分かりづらさとネット検索結果の貧弱さは仕方ない
707:デフォルトの名無しさん
20/10/27 19:33:07.02 w/TzFTqy0.net
>>697
resizeはどうだ？
708:デフォルトの名無しさん
20/10/27 19:35:27.63 w/TzFTqy0.net
最近おもいついたこと
ワークシート関数→波紋
VBAマクロ→幽波紋
709:デフォルトの名無しさん
20/10/27 23:01:35.17 o6G0sPC10.net
>>689
裏技っぽいかは知らんがこれ好き
a = b = c
710:デフォルトの名無しさん
20/10/27 23:03:09.41 gj2Ohu8L0.net
>>679
ありがとうお勧めではないそうですが
教えてくださった方法でコメントアウトできたので
使いますww
711:デフォルトの名無しさん
20/10/27 23:05:41.35 WVQXu4mGa.net
代入が式の言語だと、結果 a、b、c が同値になるし、イヤだなぁ…
712:デフォルトの名無しさん
20/10/27 23:13:03.58 WVQXu4mGa.net
>>705
[表示]-[ツールバー]-[編集] で表示られるアイコンの左から9番目で選択範囲を一括コメント化、その右のアイコンでコメント解除
それも試してみてください
713:デフォルトの名無しさん
20/10/27 23:23:37.13 2iVpt4JMa.net
>>704
おれは嫌い
714:デフォルトの名無しさん
20/10/28 06:32:08.53 MUExsF8QM.net
マクロ実行後、
エクセルファイルを保存しようとすると
プライバシーに関する注意
というメッセージが出ます。
出ないよう設定できるようですが
セキュリティ的に不安です。
皆さんどのような対処をされてますか
いったんエクセルを全部終了するくらいしか
思いつきません
715:デフォルトの名無しさん
20/10/28 06:48:10.23 MGib4+U5M.net
マクロ実行後、 ←この時点で手遅れ
716:デフォルトの名無しさん
20/10/28 08:53:47.67 MUExsF8QM.net
>>710
実行前に他のエクセルを終了するのが
一般的でしょうか
717:デフォルトの名無しさん
20/10/28 12:22:09.47 VqefcRCnM.net
>>704
好きとか嫌いとかじゃなくて
If b = c Then
a = True
Else
a = False
End If
みたいなコード書くなら
a = b = c
ッて書いた方が楽じゃね？
718:デフォルトの名無しさん
20/10/28 12:26:16.35 SBFJNMXDM.net
後から見直すときに前者の方が見やすい
書く時に楽かどうかは別にどうでもいいです
719:デフォルトの名無しさん
20/10/28 13:08:13.57 Gcn0+siH0.net
a = (b == c)
ならいいんだけどなぁ
720:デフォルトの名無しさん
20/10/28 13:28:06.88 ArgZkv9MM.net
インタプリタの時代にif文の構文解析が遅いからって可読性皆無の謎の数式書いてた思い出
721:デフォルトの名無しさん
20/10/28 15:35:13.90 0lSgHaJH0.net
>>697
教えてくれてありがとうございます
これが普通なんですね
仕方ないので暫くはこれで大人しく頑張ってみます
何か荒れてたとこに変な質問して申し訳ありませんでした
722:デフォルトの名無しさん
20/10/28 18:57:08.32 koZ0sZlBM.net
>>696
冗長とか増長とか言う前にシートを指定せずにcells( )とか使うのはバグの元、せめて
With Worksheets("sheet2")
.Range(.Cells(1, 1), .Cells(UBound(tmp), UBound(tmp, 2))) = tmp
End With
にした方がいい
723:デフォルトの名無しさん
20/10/28 19:02:36.90 SBFJNMXDM.net
withはなんか嫌い
724:デフォルトの名無しさん
20/10/28 19:10:52.23 URI3IFfrM.net
DAIGO監修マッチングアプリ
725:デフォルトの名無しさん
20/10/28 19:13:48.38 Aw3ALjki0.net
..でもうひとつ上のwithが使えるとか変な拡張してほしい
726:デフォルトの名無しさん
20/10/28 19:29:16.70 n4xiXKpa0.net
>>717
With ThisWorkbook.Worksheets("sheet2")
.Cells(1, 1).Resize(UBound(tmp), UBound(tmp, 2))) = tmp
End With
おれはブックから指定しないと気が済まんな
727:デフォルトの名無しさん
20/10/28 19:32:00.41 XiKqUxDYM.net
withはなんか嫌い
728:デフォルトの名無しさん
20/10/28 19:40:24.53 8aJXN6gS0.net
Sheetオブジェクトにbookから指定したシート格納して扱うことが多いかなー
729:デフォルトの名無しさん
20/10/28 19:43:09.41 Aw3ALjki0.net
SetしたらNothing警察がウルサイんだよ
730:デフォルトの名無しさん
20/10/28 19:44:40.32 n4xiXKpa0.net
Withじゃないと他人がつけたSheetやRangeの変数名を把握するの大変じゃない？
731:デフォルトの名無しさん
20/10/28 19:49:35.60 HcvuYFHJd.net
>>696
???
worksheets("sheet2").usedrange.value= tmp
じゃ駄目なのか?
範囲の文字が欲しいなら
worksheets("sheet2").usedrange.address
とかでも駄目?
732:デフォルトの名無しさん
20/10/29 12:00:49.68 xpkBYj/E0.net
>>726
sheet1と2じゃUsedRangeの範囲が違うだろ
sheet1の範囲取得しないと
733:デフォルトの名無しさん
20/10/29 12:27:28.32 wp9TtuK3d.net
>>727
意味が分かった。
ならアドレスでOK。
アドレス違うなら関数作れ。
入ってる二次元配列がどんなであろうと貼り付け先1セル指定で貼り付く奴。
734:デフォルトの名無しさん
20/10/29 18:28:14.85 2VkEHk3qa.net
背中にお婆さんがはり付いているよ
735:デフォルトの名無しさん
20/10/29 21:30:53.07 4HKKGi1r0.net
vba配列操作貧弱すぎてつらい
736:デフォルトの名無しさん
20/10/30 14:29:28.42 mCzxAGXk0.net
ならVBAやめなよ
737:デフォルトの名無しさん
20/10/31 00:00:44.18 OI+kPxFG0.net
無理にやる必要わない
UB人口少ないし
738:デフォルトの名無しさん
20/10/31 19:30:50.69 ihhGxqs70.net
複雑な部分はpowershellでやれ
739:デフォルトの名無しさん
20/10/31 20:06:28.46 p/A/SH820.net
そしてそっちのスレでやれ
740:デフォルトの名無しさん
20/11/01 06:21:53.30 eo7/HsaKM.net
Excel add-insならJavaScriptでExcelを操作できる
URLﾘﾝｸ(docs.microsoft.com)
741:デフォルトの名無しさん
20/11/01 13:18:53.92 RpKdwAj80.net
ね
老害がいっぱいでしょう
742:デフォルトの名無しさん
20/11/01 14:06:41.78 wVa8LgII0.net
会社でxlsmファイルを次の担当に引き継ぐことになりました。
microsoft scripting runtimeの設定をそのファイルに施してあります。
次の担当者は自分で設定しなくても普通に使えるんでしょうか。
それとも自分で開発タブを表示するところから設定しないと
エラーになってしまうのでしょうか。
743:デフォルトの名無しさん
20/11/01 14:29:30.14 rqDSIn020.net
参照設定はユーザー毎じゃなくてファイル毎に設定
744:デフォルトの名無しさん
20/11/01 14:51:11.65 HO7tvAnU0.net
>>737
なぜやってみないの？ゆとりなの？
745:デフォルトの名無しさん
20/11/01 15:54:59.46 wVa8LgII0.net
やってみたところ>>738の印象だったのですが
実際どーなのかなあって思いまして・・
746:デフォルトの名無しさん
20/11/01 17:10:27.45 osQdZjWG0.net
一時期excelでpthon使えるようになるとかあったけどあれどうなったんだ
正直ちょっと期待してたんだけど
747:デフォルトの名無しさん
20/11/01 22:02:08.34 8xLcKULEF.net
>>741
その話は消えたようだ
URLﾘﾝｸ(qiita.com)
748:デフォルトの名無しさん
20/11/03 03:00:31.66 N88Bm9k/0.net
僕「複数のブックから値を取得したい時どうしたらいいんだろ」検索
検索結果「全部のブックを開いて取得しましょう。外部参照しましょう。」
僕「こいつら正気かよ…」
749:デフォルトの名無しさん
20/11/03 07:44:54.83 Z7LuIdeU0.net
他にどうしろと
特にZIP圧縮になって以降
750:デフォルトの名無しさん
20/11/03 12:46:38.69 3Zl4+FN80.net
ちょっと読むだけなら4macroとか大量データでないならDB接続とか
751:デフォルトの名無しさん
20/11/03 15:03:36.63 Wl8qkqc+a.net
いつもの人でしょ
752:デフォルトの名無しさん
20/11/03 22:04:34.20 DcyztcMU0.net
クラスが便利なのは分かっているんだが、難しくてやる気なくしてたんだけど
ユーザー定義型Typeね、アレすげえな
バカなオレでもプログラミングしている気分にさせてくれるくらい簡単
753:デフォルトの名無しさん
20/11/04 06:49:14.88 dR//5Nki0.net
おれもクラスを調べてるけど要はオブジェクトを自分で作り出せるというところまでは分かった
754:デフォルトの名無しさん
20/11/04 18:04:37.59 H6E0ixtH0.net
>>745
おそらく4macroで使える程度の関数群は外部参照で元ファイル開かなくても参照できる
どんなデータを集計したいかしらんけどただ値を取得したいだけならブック開く必要ないよ（裏では開いてるけど）
一方最近の関数使ってるなら安全のためにブック開いてたほうがいい
DB接続ってのはエクセルファイルにDB接続できないから意味ないだろうね
755:デフォルトの名無しさん
20/11/04 19:12:35.17 LUbnrRil0.net
できることしか言ってないよ
756:デフォルトの名無しさん
20/11/04 20:01:28.17 YMXq55HT0.net
>>749
db接続できないと思ってるような人はコメントしなければいいのに
757:デフォルトの名無しさん
20/11/04 20:42:14.94 iJjhODSM0.net
>>749
ジェットでインストール可能なイサムすればつながるだろうが!
758:デフォルトの名無しさん
20/11/04 21:07:01.95 +u5LkCAg0.net
txtデータをダイアログから開いた時に
元のxlsmにあるテンプレというシートを
毎回そのブック内の右側に添付したいんですが
御教授お願いします。。
毎回txtデータの名前は異なります。
なかなか調べてもわかりません
759:デフォルトの名無しさん
20/11/04 21:12:25.29 iJjhODSM0.net
よくわからんが、単純に If right(filename, 4) = ".txt" Then じゃダメなんかい
760:デフォルトの名無しさん
20/11/04 21:32:08.71 +u5LkCAg0.net
>>754
初心者で理解できてなくてすみません
色々サイトを検索はしたのですが
Sub テキストを読み込む() Dim TARGET_TEXT_FILE As String
ChDir "C:\テキストデータフォルダ"
TARGET_TEXT_FILE = Application.GetOpenFilename("テキストファイル,*.txt")
If TARGET_TEXT_FILE = "False" Then Exit Sub Workbooks.OpenText TARGET_TEXT_FILE End Sub
今のところこれでテキスト開いてるだけなんですが
全く変えた方がいいですか？
これで開いた新ブック全てに元々あるテンプレというシートを添付させたいのですが
説明も下手で申し訳ないです
761:デフォルトの名無しさん
20/11/04 22:21:06.79 +u5LkCAg0.net
結構片っ端からヒットしたサイト調べてますが答えがあるのかもしれないのですがなかなか知恵が出てこず…どなたかお助け頂ければと
762:デフォルトの名無しさん
20/11/04 22:28:00.55 iJjhODSM0.net
開いた後にこうかな?
ThisWorkbook.Worksheets("テンプレ").Copy , Workbooks(Dir(TARGET_TEXT_FILE)).Sheets(1)
763:デフォルトの名無しさん
20/11/04 22:41:28.62 4kHESo6md.net
>>755
Dim tsh As WorkSheet
Set tsh = ThisWorkBook.Worksheets(″テンプレ″)
としておいて、
テキストファイルをオープンした後に
tsh.copy
ActiveWorkbook.insert
とかなんとかできないかね
764:デフォルトの名無しさん
20/11/04 23:45:56.25 +u5LkCAg0.net
>>757
>>758
お二方、本当にありがとうございます。
いまホテルでPCが無い環境になってしまったので
また試させていただきます。
もし上手く動かなくても勉強にさせてもらいます。本当に感謝します。
765:デフォルトの名無しさん
20/11/05 00:34:34.60 Hf0k6gxcd.net
初心者、勉強中って設定でくれくれするスタイル
766:デフォルトの名無しさん
20/11/05 00:55:08.79 E/zWC4JEM.net
ID:+u5LkCAg0
いつものあいつだろ
767:デフォルトの名無しさん
20/11/05 01:18:00.31 MmJj0qw00.net
わざわざこんなとこで聞くよりググったほうが早いからな
ただのかまってちゃんだ
768:デフォルトの名無しさん
20/11/05 01:33:03.90 wTkbtAOfd.net
>>762
意味もわからずコピペするだけの馬鹿だから無理なのだろ
769:デフォルトの名無しさん
20/11/05 01:37:27.03 eUwwuQR20.net
>>759
死ね
770:デフォルトの名無しさん
20/11/05 13:00:01.73 OVMdlSXB0.net
>>751
>>752
直じゃなくて一旦DB化（一括インポート）しなきゃなんねえの
Jet.OLEDB,ACE.OLEDB,SQL Server,Power Query
外部DBが使えるならなんでもええがな
こいつら通さずエクセルに直にSQL送ったところで何も帰ってこないよ
さらにいうとエクセルファイルにDBアクセス中にエクセルファイル書き換えると整合性が取れなくなる
別物をかましてるんだからエクセル同志でDB接続とは言えんだろ
771:デフォルトの名無しさん
20/11/05 13:45:53.52 eUwwuQR20.net
>>765
黙っていればいいのに
772:デフォルトの名無しさん
20/11/05 17:33:55.88 E/zWC4JEM.net
ODBC全否定の馬鹿がいる
773:デフォルトの名無しさん
20/11/05 18:57:09.85 hU6fY/MX0.net
凄く初歩的な質問ですいません。
VbaでEDGEを操作することは可能ですか？
可能ならIEで使っていたコードは使えるんでしょうか？
774:デフォルトの名無しさん
20/11/05 19:50:31.94 SbS9cEmY0.net
>>765
ただの屁理屈だそんなもん
ADOだのMSクエリ前提で話しているに決まってるだろうが
パソコンでテレビを見るには、チューナを外付けしないといけないから、
パソコンでテレビを見られるとは言えない、とか言ってるようなものだぞ。
775:デフォルトの名無しさん
20/11/05 19:55:08.43 f0srNcEJ0.net
それは見られるとは言えなくないかな
776:デフォルトの名無しさん
20/11/06 08:21:13.15 aBeRil+I0.net
いつものあいつって、最初はものすごく下手に出ておいて、希望した回答が得られないと態度が豹変するあいつ？
777:デフォルトの名無しさん
20/11/06 08:41:53.56 OISZDae80.net
元管理職の失業組だろ
778:デフォルトの名無しさん
20/11/07 18:11:38.24 6yLRlRLnd.net
VBAで業務の効率化ってさ
そもそもその会社の業務自体に無駄があるってことなんじゃないかと思う
779:デフォルトの名無しさん
20/11/07 20:19:13.66 ufTrf7Gx0.net
職場によるだろ
780:デフォルトの名無しさん
20/11/08 11:01:30.15 j+tA5MDCr.net
ipodを水槽にいれて泡がでたら無駄な隙間があるとか言う人いたな
781:デフォルトの名無しさん
20/11/08 19:42:01.52 T0G2ZKHSd.net
>>775
それ、Walkman
782:デフォルトの名無しさん
20/11/08 21:47:30.07 EFkAxVvD0.net
ジョブズじゃなかったんだな
そしてウォークマンでもなくてハンディカムのようだ
URLﾘﾝｸ(www.youtube.com)
このサイトから URLﾘﾝｸ(www.netlorechase.net)
783:デフォルトの名無しさん
20/11/08 23:24:57.18 FZ/N1P5c0.net
そうだったか
784:デフォルトの名無しさん
20/11/10 00:58:18.05 e7NaagA90.net
ExcelのM言語のMはマイクロソフトのM？？
785:デフォルトの名無しさん
20/11/10 03:15:43.67 Zw48sTQ/M.net
M言語
M数式言語
M formula language
Mathemstics？
786:デフォルトの名無しさん
20/11/11 01:18:20.78 410+hQkP0.net
>>777
マジか。俺もジョブズだと思ってたわ
787:デフォルトの名無しさん
20/11/11 04:19:34.31 WkAepZ970.net
3つの整数をA1,B1,C1にいれるとE1に最大公約数を返すプログラムの作り方をforを用いてプログラムを教えてください
788:デフォルトの名無しさん
20/11/11 05:44:55.43 VHf4ZVdyd.net
>>782
まずVBEを起動するんだfor!
アルゴリズムを調べてコーディングするんだfor!
うまく動くかテストするんだfor!
789:デフォルトの名無しさん
20/11/11 07:39:17.89 8Vps9xVZF.net
関数だけでできそうだけど
そういう課題なのか
790:デフォルトの名無しさん
20/11/11 09:12:45.50 NzDVkmVe0.net
>>782
GCD関数使えよforw
791:デフォルトの名無しさん
20/11/11 10:48:02.91 Dk9c6JTy0.net
worksheetfunction.gcd
792:デフォルトの名無しさん
20/11/11 10:56:58.34 IB1GfatT0.net
>>782
最大公約数ってどうやって求めるか学校で習わなかった？
793:デフォルトの名無しさん
20/11/11 13:53:58.74 e2rtbcNbd.net
習った方法を使えっていう宿題でしょ
794:デフォルトの名無しさん
20/11/11 21:28:17.72 vTolfJQJ0.net
最大公約数ってなんだっけ
795:デフォルトの名無しさん
20/11/12 02:56:54.96 D//YL0tK0.net
Option Explicit
Sub a1tob1toc1nosaidaikouyakusuuwoe1ni()
Dim i As Integer
For i = 1 To 32766
Range("E1").Value = Application.WorksheetFunction.Gcd(Range("A1"), Range("b1"), Range("c1"))
Next
End Sub
796:デフォルトの名無しさん
20/11/12 09:09:00.81 ST9GqaMQx.net
integerは内部的にlongで
797:デフォルトの名無しさん
20/11/12 09:53:50.69 dLdd5MAGd.net
for文にするだけ時間の無駄でﾜﾛﾀ
798:デフォルトの名無しさん
20/11/12 10:00:33.57 PR3AJwPG0.net
>>789
URLﾘﾝｸ(ent.smt.docomo.ne.jp)
799:デフォルトの名無しさん
20/11/12 10:05:34.74 D//YL0tK0.net
「最大公約数的に言ってもさあ、チーズはトマトと合わないだろ」
800:デフォルトの名無しさん
20/11/12 10:12:44.88 3oP0YSbIM.net
URLﾘﾝｸ(ja.wikipedia.org)
801:デフォルトの名無しさん
20/11/12 12:26:30.98 jhXNMBL9d.net
>>790
E1のセルに穴が開いてしまいそう
802:デフォルトの名無しさん
20/11/12 13:00:21.74 Xe+3GA0qr.net
セルに穴が開くは草
803:デフォルトの名無しさん
20/11/12 13:14:40.95 0RDn4/V3a.net
実行時エラー
E1 セルに穴が空きました。
804:デフォルトの名無しさん
20/11/12 13:28:50.78 wc/lKUuCa.net
ソルバーって難しい？
805:デフォルトの名無しさん
20/11/13 10:02:25.42 LV0NFHn10.net
ザッパーを256発当ててもバキュラは壊れません
806:デフォルトの名無しさん
20/11/13 20:33:56.91 O1u/8jBw0.net
VBAでシフトJISファイルをEBCDICに変換するマクロ作ってみたわ。
URLﾘﾝｸ(tamajimu.sytes.net)
VBScriptのやつはあったけどVBAのがなくて移植しようと思ったら手こずってしまった。
もっといいやり方あるのかな？
ネット上にはVBAのやつがなかったので自分のを公開する。
807:デフォルトの名無しさん
20/11/13 22:57:57.42 BOglHVUm0.net
VBSで済むならVBSでいいんじゃない?
808:デフォルトの名無しさん
20/11/14 11:53:56.66 vG/wLc460.net
>>801
wikiに詳しく書いてあるのを読んで目的の動作をしたならそれでいいと思う
809:デフォルトの名無しさん
20/11/15 12:06:41.61 2IkUI34w0.net
昔VBで自作した覚えがあるなぁ
VBSの移植で、どこにどう手こずったんだろ
.NETのSystem.Text.Encoding使う手はどうだろうと考えたみたが
GetEncodingでエンコード取得するのがうまくいかんな
誰かこれうまいことやる方法しってる？
810:デフォルトの名無しさん
20/11/15 17:00:18.68 11DSlt/B0.net
無いと思うな
最悪、CreateObject("WScript.Shell")で逃げられるし
811:デフォルトの名無しさん
20/11/16 14:27:06.48 yPbGtyDu0.net
ウインドウ固定をスクロールに応じて動的に変えるにはどうすればいいですか？
例えば、最初は2018年の列が固定されていて、2019年の列までスクロールしたら、2018年の固定を解除して2019年の列を固定するように変えたいです。
812:デフォルトの名無しさん
20/11/18 17:51:40.71 kO5sqIUGM.net
>>773
残業代欲しくてわざとチンタラ仕事したり自分にしかわからないようにするのをVBAでどーにかするのは無理だわな。
813:デフォルトの名無しさん
20/11/20 19:59:25.75 eS+rN1Snr.net
shapes.count、chartobjects.countで数えても引っ掛からないグラフってどうしたら操作できますか？
そのグラフは隣シートを参照して自動的にできるものっぽいんですけど
814:デフォルトの名無しさん
20/11/20 20:06:15.76 4NTNOb8s0.net
リストボックスの検索結果をダブルクリックすると該当セルを選択するようなものを実現したいのですが
実行時エラー 13
型が一致しません
とでます
該当箇所は
.Range(.Cells(ListBox1.List(ListBox1.ListIndex, 0) + 1, 1), .Cells(ListBox1.List(ListBox1.ListIndex, 0) + 1, 13)).Select
です
恐らくネットからコピペして来たものなのでセルの選択が間違っているのかと思うのですが、このコードの意味がわかりません…
どう修正すればいいでしょうか
またどこがなんの意味を表しているのか教えてください
全文 URLﾘﾝｸ(writening.net)
815:デフォルトの名無しさん
20/11/20 20:13:05.23 4NTNOb8s0.net
全文 URLﾘﾝｸ(writening.net)
上げ直しました
816:デフォルトの名無しさん
20/11/20 21:26:13.24 u+DVE/AE0.net
なぜ中途半端にあげるかね？
いちいちコマンドボタンやらテキストボックスやらデータなんて
作ってられるかっちゅうの
817:デフォルトの名無しさん
20/11/20 21:38:29.90 YhokOqrJM.net
だっちゅーの！
818:デフォルトの名無しさん
20/11/20 22:41:32.48 D5mBkKKe0.net
いつもの人だからなぁ
819:デフォルトの名無しさん
20/11/21 02:17:04.68 Kfg2B/Kg0.net
一々ソース見てないけど
どうせ標準モジュールでちゃんとどのブック、どのシートと指定していないと決めつけていい？
820:デフォルトの名無しさん
20/11/21 02:48:01.11 sGgCeBQZ0.net
>>809
貼り付けミスしなんじゃないかな
821:デフォルトの名無しさん
20/11/21 06:39:44.77 Q7uFQ1A40.net
.Range(.Cells(略),.Cells(略))
↓
Range(.Cells(略),.Cells(略))
822:デフォルトの名無しさん
20/11/21 13:47:07.56 NgQ98i5wM.net
Excel VBAでも証券会社(e立花証券)のAPIを操作できるのでしょうか？
ExcelのVBA以外やったことがなくpytonなどからAPIを動かしてる動画などはよく見かけるんですが
823:デフォルトの名無しさん
20/11/21 15:32:34.25 3xACDtrT0.net
またいつもの人か
824:デフォルトの名無しさん
20/11/21 18:28:17.03 P16HPZ2I0.net
JSONって書いてあるから出来るんじゃないかと思ってググったら、
トレードステーションスレとマルチしてるのが見つかったわwwww
825:デフォルトの名無しさん
20/11/22 02:36:45.00 xXy7jV1TM.net
人に聞きまくるだけのクズ
826:デフォルトの名無しさん
20/11/24 19:01:29.52 IcwWHa740.net
クズは悪意のあるマクロとか平気で作るからな
827:デフォルトの名無しさん
20/11/29 03:39:08.87 zPhy879P0.net
ExcelでADOを使ってcsvを取り込む前に、
①csvの1行目を削除
↓
②csvの特定の列の1行目(①の前は2行目)の文字を修正
これを自動化するにはどうしたらいいですか？
業務システムから出力されたcsvをExcelに取り込む作業があるのだけど、
1行目に邪魔な出力日時が出てきてこれを消さないとADO＋SQLのselect文で2行目のフィールド名を使えません
あとフィールド名に一部重複があるので、
例えば「日付」→「日付2」に修正した上で取り込みたいです
828:デフォルトの名無しさん
20/11/29 06:51:19.70 FO1CPqk3M.net
データとして読み込む前に、一行目棄てる、フィールド名変える処理したテンポラリファイルを作る。
829:デフォルトの名無しさん
20/11/29 09:01:56.95 Kj8zNz7J0.net
ああ、俺もそういうカスみたいなCSVに当たったことあるわ。
何のためのCSVだボケって言いたくなるような。
最初に1行だけテキスト読み込みして日付を調べておいて、
SELECT [出力日：2020/11/29] AS 商品コード
F2 AS 商品名
F3 AS 単価
F4 AS 数量
WHERE 商品コード <> '商品コード'
とか無理矢理やるわwww
830:デフォルトの名無しさん
20/11/29 09:12:18.87 sYtQed9+0.net
フィールド名に重複とかどんな出力したんや。。Excelからくらいだろそんなの
831:デフォルトの名無しさん
20/11/29 09:20:35.18 Kj8zNz7J0.net
CMやってるような有名なシステムでも、そういうアホな出力あるよ
あとカンマ入れるとそのまま出てきて1列ずれるとか
832:デフォルトの名無しさん
20/11/29 09:47:04.02 GxGIo6I2d.net
アホかねえ。
別にそんなのどうとでもなるから不満にもならんな。
833:デフォルトの名無しさん
20/11/29 10:21:13.40 cY0oCL3I0.net
>>823
できました！
csvの取り込み方を工夫するのではなく、
tmpシートを新たに用意してそこに読み込ませて加工、
今度は今までのコードの接続先をcsvではなくtmpシートに変えてなんとかなりました
>>824
作った業者がアホなのか依頼した会社がアホなのかわかりませんが、
例えば商品コード的なものも正式表記と略号表記があって、
どちらも同じ「商品コード」というフィールド名になってたりします
834:デフォルトの名無しさん
20/11/29 19:32:45.82 0shL7X0+0.net
前々スレくらいで乱数発生教えてくれた人
今でも本当にありがとうと感謝してる
仕事で役立ちすぎて凄いわ
ある範囲を元に乱数発生させるがその数値は変化をさせないジレンマのあるようななるほどと思わせる構文ですね
と言われたわ
835:デフォルトの名無しさん
20/11/29 20:57:17.58 IKbaIR8zM.net
元スレ読んでないけど仕事で乱数使うの？
836:デフォルトの名無しさん
20/11/30 03:02:50.68 sOcEfqne0.net
ちょっと前にランダムなデータを提出する謎仕事の質問があったなあ
VBA化したら一瞬で終わるようになって事務員がクビになったとか、そんな話
837:デフォルトの名無しさん
20/11/30 08:57:41.49 xTe8QWkix.net
んん？？
ランダムなデータを手作業で作るの？
かなり偏り出そうな…
838:デフォルトの名無しさん
20/11/30 11:41:47.50 iR+tWSWoM.net
データ数が有限だと、それが本物の乱数なのか人工的な物なのか判断する方法は存在しないんだよね
どんな数字列でも無限にある乱数列のどこかに存在するってのが本来の乱数の性質だから
839:デフォルトの名無しさん
20/11/30 12:10:12.72 Jnj49cs/M.net
仕様書の範囲内でバラけた成績を印刷するお仕事
840:デフォルトの名無しさん
20/11/30 13:26:59.23 owcTZSsV0.net
無限のデータって何よｗ
あったとして、お前それ仕事で扱うの？ｗｗｗ
841:デフォルトの名無しさん
20/11/30 20:42:38.07 ocjeHolz0.net
無限発射編と言っても実際には無限じゃないしな
本当に無限発射すると宇宙がヤバイ
842:デフォルトの名無しさん
20/11/30 23:51:07.47 14M55Ual0.net
毎日出力される日報の各数値を手打ち入力とかよくあるわな
そんな無駄な作業専門で雇われている人、無駄ともおもわず人件費払っている企業
なんて古き良き日本にいくらでもあるわな
843:デフォルトの名無しさん
20/12/01 01:02:20.49 KOqkaYUf0.net
夢幻には続かないだろ。
人類がドンナニ存続したところで地球が太陽に飲み込まれたところで終わり。
はい。どこが無限？
無限舐めてんの？
844:デフォルトの名無しさん
20/12/01 13:40:24.29 ONuiiYDb0.net
設計書のヘッダー全部オブジェクトにしたやつなんなんだよ
頭わいてんのか
845:デフォルトの名無しさん
20/12/01 15:04:54.04 5apuVehDa.net
許可とって修正すればいいのに
846:デフォルトの名無しさん
20/12/01 15:57:24.69 vDY3LCcWa.net
本文と共通ヘッダーの構成があわないからオブジェクトで無理くりヘッダー作ってたりするんだよな
うちにもそういうのあるわ
847:デフォルトの名無しさん
20/12/02 18:57:34.84 EOzgXD7Pr.net
すいません、全くvbaについて無知なのですが、A2セルに入力した数字を、A3セルに=A2にて反映させてます。A2セルに続けて数字を入力した時に、A3セルの数値は、続けて入力した値になると思うのですが、入力した内容を上書きせず、A4.A5.A6...と、下のセルに移動させることは可能ですか？また、その数値も自動的に小さいものから並び替えできるでしょうか？
848:デフォルトの名無しさん
20/12/02 19:24:49.44 81/GxXQs0.net
1回目入力 A3に
2回目入力 とりあえずA4に
A3～A4を並び替え
3回目入力 とりあえずA5に
A3～A5を並び替え
って事？
849:デフォルトの名無しさん
20/12/02 19:37:38.35 nZBMSUJj0.net
VBAに使用期限つけてパスワードかけて異動するわ
来年のある日から使えなくなる
さようなら
850:デフォルトの名無しさん
20/12/02 21:30:31.44 /gAV7aXpr.net
異動かよ
呼び戻されるだけじゃん
辞めろよw
851:デフォルトの名無しさん
20/12/02 21:31:41.45 gNwzbv2M0.net
>>844
ＶＢＡのパスワードなんて簡単に解除できちゃうから意味ないぞ
852:デフォルトの名無しさん
20/12/02 22:02:06.69 nZBMSUJj0.net
>>845
いや、知らないですけど、くらいにとぼけようかなと
>>846
そこまでガチガチにやるつもりもなく
プロパティのロックしとく程度の予定
やっぱ悪質かなぁ
上司と遺恨のあるまま異動だから悔しくて
853:デフォルトの名無しさん
20/12/02 23:32:51.81 sVdwSulSd.net
自分で作ったんなら削除して手作業でやるんですよと引き継ぎすれば良いやん
854:デフォルトの名無しさん
20/12/02 23:51:34.76 HxNBAEyx0.net
>>843
いや、入力は全てA2セルで固定して行い、A3セルに反映された値を消すことなく(A2に次の入力があれば、A3の値がA4とかに移動すりかして残るように)、連続入力がしたいです。
855:デフォルトの名無しさん
20/12/02 23:59:29.48 gNwzbv2M0.net
>>847
その気持ちスゲー分かるわ
だって俺と考えてること一緒だもんｗ
856:デフォルトの名無しさん
20/12/03 00:00:39.50 txWN3KLI0.net
出来る
857:デフォルトの名無しさん
20/12/03 00:23:36.83 Bl+88s6V0.net
>>847
時限式のマクロウイルスみたいだな
858:デフォルトの名無しさん
20/12/03 01:18:20.98 VMRuQ+pk0.net
2020年をマジックナンバーとして仕込む
特定のデータをマジックナンバーry
閏年を考慮しない
自作アドインを前提にする
外部VBAをローカル指定する
859:デフォルトの名無しさん
20/12/03 07:23:21.58 Fq6gB0XC0.net
会議を管理するデータベースを作成しています
テーブル1に日付、開始時間、会議名、条件があり、
条件がTrueの会議名を重複なくテーブル2に転記
その後テーブル1に新たな会議データが登録された場合も、
条件がTrueでテーブル2に該当がなければテーブル2に転記という流れ
↑こんな感じで良い方法ありますでしょうか
860:デフォルトの名無しさん
20/12/03 07:27:15.83 EYBx9umhM.net
その通り作ればいいじゃん
861:デフォルトの名無しさん
20/12/03 07:43:14.95 Bl+88s6V0.net
>>854
それを作るのがあなたの仕事では？
自力でできないならできる人に頼むしかないと思う
862:デフォルトの名無しさん
20/12/03 07:46:08.63 MQ9f0mIwx.net
作ってくれスレじゃねーからな
863:デフォルトの名無しさん
20/12/03 10:27:32.16 ++Zqkwk80.net
>>849
合ってるやん
1回目(A2に)入力(したのを) A3に
2回目(A2に)入力(したのを) とりあえずA4に
A3～A4を並び替え
3回目(A2に)入力(したのを) とりあえずA5に
A3～A5を並び替え
864:デフォルトの名無しさん
20/12/03 10:29:56.68 OwpIF+c4r.net
>>858
あってますね。すいません、理解力が足りませんでした。
865:デフォルトの名無しさん
20/12/03 11:38:03.37 7S9ZRXuG0.net
>>847
転職ならいいけど異動ならその上司が移動先の上司に電話して「なんか動かなくなったから彼1日借りるね」って言われて直させられるだけやん
しかも原因わかったら移動先の上司にチクられるだろうし
866:847
20/12/03 12:58:46.44 7SYgfNcjM.net
全然関わりない遠い部署に行くから
俺が完全に自作したものを皆が使い回してるだけだし無効化してやろうかなと、
そこに行ったら知らないで通して最悪本当に呼び出されたら
下のように感じでコメント入れとけば
最悪、立ち会いでモニタ見られながらやっても
確信犯なのは避けられるかなと…
このまま異動はどうも許せんくて
性格悪いのは自覚してる
'マクロを最新で運用するために必須
Private Sub Workbook_Open()
Dim today As Date
Dim exp_date As Date
today = Date
'日付制限して確実にメンテナンス
'これは怠らないこと
exp_date = "2021/2/20"
'書類の改定の確認で定期的にメンテナンス が必要だから一度確実に止めてしっかり確認
If Not today < exp_date Then
ThisWorkbook.Close savechanges:=False
End If
End Sub
867:デフォルトの名無しさん
20/12/03 13:04:06.25 By9u7ZkT0.net
好きなようにしてここからも関わりのないどこか遠くへ行ってね。
ずーっと複数人がしてた忠告に耳もかさず我を通した結果であって
最後くらい責任持ってケツ捲くってね
868:デフォルトの名無しさん
20/12/03 13:04:24.24 eDye5v6CM.net
バレたら損害賠償モノだと思うし容易にバレると思うけど
869:デフォルトの名無しさん
20/12/03 13:10:53.58 AggFt+oH0.net
会社の時間を使って作った会社の資産であるのに個人のものと勘違いしてる馬鹿
870:847
20/12/03 13:54:32.21 7SYgfNcjM.net
家で作ったプロシージャをtxtでコピーして会社にメールで送ってハメてただけだから
ほとんど個人の時間削ったものだけどね
ちょっとやってみるかなあ
871:デフォルトの名無しさん
20/12/03 18:28:51.55 wVqnbq9D0.net
application.ontimeメソッドを使ってるのですが、
For i = 0 To Counter
Application.ontime StartTime + Interval * i, "renzoku"
Next i
これを停止させるのが難しそうだったので、
停止はさせないで、エクセルを閉じれば停止すると思ったのですが、
他のエクセルを開いた状態で、これを閉じたら、
またマクロが動き続けてしまいます、
ontimeメソッドを停止させるか、
マクロの書いてあるエクセルを閉じたら、
ほかのエクセルが開いていてもマクロを停止するようにはできないでしょうか？
872:デフォルトの名無しさん
20/12/03 18:35:32.96 0OrJPKRU0.net
ワークブックのイベントで検索
873:デフォルトの名無しさん
20/12/03 19:23:44.42 PVVpY3tx0.net
>>866
タイマーで設定した内容をどこかに覚えておいて、また停止させるマクロを動かす
面倒だけど、それ以外に方法はない
874:デフォルトの名無しさん
20/12/03 19:41:46.88 is546aJe0.net
CSVのデータを開いて
全部その中で計算させて結果だけをマクロブックに取り込んでCSVを閉じる
初心者ながら成功した…うれしいわ
875:デフォルトの名無しさん
20/12/03 21:55:24.24 anyYWQoy0.net
｢慶應卒の学歴なんていらない｣10代起業で成功する子の共通点
URLﾘﾝｸ(www.excite.co.jp)
【アプリ開発で起業】必要な心得とマネタイズ方法のすべて
URLﾘﾝｸ(www.dreamgate.gr.jp)
学生起業家が開発、「人を軸に本を探すアプリ」とは？読書通じて「考える力」養って
URLﾘﾝｸ(newswitch.jp)
島田商高生がアプリ考案、発表 ＩＣＴ起業家育成プログラム
URLﾘﾝｸ(www.at-s.com)
医師コンビが「治療用アプリ」で起業、禁煙に続き高血圧治療アプリを開発
URLﾘﾝｸ(diamond.jp)
好きが高じて“カレー起業”、キャッシュレス決済アプリ「TOKYO MIX CURRY」の挑戦
URLﾘﾝｸ(diamond.jp)
起業で成功するキャリア形成の仕方とは？ 元プロサッカー選手で起業家の鈴木啓祐氏に聞いた
URLﾘﾝｸ(sogyotecho.jp)
年収3,000万超え!?個人開発で儲かっている海外コミュニティサイト5選！
URLﾘﾝｸ(note.com)
876:デフォルトの名無しさん
20/12/04 00:52:07.07 rXUXpqvxr.net
ほとんどの解説サイトではcells("A1")と記載されてますが、cells (1,1)の方が分かりやすいし、vbaも組みやすいのに、なぜA1と言う記載なのでしょうか？
ここの人たちはどっちを使ってますか？
877:デフォルトの名無しさん
20/12/04 01:43:32.26 /uuA3VLbd.net
>>871
range(″A1″)ね
初心者向けにイメージ掴ませやすいような表記をしてるだけでは？
インクリメントとか考えるとcells使う方が確かに分かりやすいけどどういう訳か初心者はcellsを理解してくれない
878:デフォルトの名無しさん
20/12/04 01:44:00.17 xF22O8yc0.net
>>861
何もしないで放置しておけばいいよ
周�
879:ﾍの仕様変更で使い道なくなるだろ 後腐れなく異動しようぜ VBS使うとウィンドウ非表示で目的のファイルの削除、その後にVBSファイル自身を削除ってのが出来るけど そんな時限爆弾がスタートアップフォルダに入ってたなんてー（驚愕）
880:デフォルトの名無しさん
20/12/04 01:44:10.31 oC1oU7iua.net
range("A1") と cells(1, 1) なら変わらないけど、k列とか言われるとね
固定された位置なら前者じゃないかしら
式の解析をする分だけ前者が遅い気がするけど
881:デフォルトの名無しさん
20/12/04 01:45:24.52 oC1oU7iua.net
変数をつかうなら、cellsでね
882:デフォルトの名無しさん
20/12/04 01:46:09.78 oC1oU7iua.net
行や列と指定に変数をつかうなら、です
883:デフォルトの名無しさん
20/12/04 01:46:59.97 oC1oU7iua.net
A1にoffsetもありか
884:デフォルトの名無しさん
20/12/04 02:20:30.55 ifXtoFa7r.net
>>872
あ、rangeでした
普段使わないから間違えた
たまにしか使わないからサイト検索しながら組んでるんてすけど、分かりにくいからやめてほしい…
885:デフォルトの名無しさん
20/12/04 02:33:53.57 pAim30VZ0.net
>>878
いつものあいつ
886:デフォルトの名無しさん
20/12/04 06:54:12.47 Ao/7FxRU0.net
rangeは範囲を選択するときは便利だけど1つのセルならcellsだね
まあ範囲も動的ならrangeの中にcells使うけど
887:デフォルトの名無しさん
20/12/04 06:57:58.98 zpKrUFifM.net
rangeは名前付けてるセルを指定するときに使う
888:デフォルトの名無しさん
20/12/04 10:09:04.15 QvMd2aQjM.net
最初の頃はExcel上とかRangeだとA1(A列、1行)って列、行の順なのにCellsは行、列の順だから混乱した記憶がある
889:デフォルトの名無しさん
20/12/04 12:34:38.31 j7DbuDw80.net
歴史的にはR1C1方式の方が先なんだけどな
890:デフォルトの名無しさん
20/12/04 14:03:07.99 ESISvWhvd.net
>>830
入構2週間前からの体温を記録する資料の提出を入構2週間前切ってから要求された場合とかな
vbaじゃなくワークシート関数でできるけど
891:デフォルトの名無しさん
20/12/04 14:09:34.65 UF2xE4cEH.net
ユーザーフォームで使用するSubやfunctionプロシージャって標準モジュールに書くのが一般的？
独学だからよく分かんないのよね
892:デフォルトの名無しさん
20/12/04 14:11:25.58 UF2xE4cEH.net
↑ユーザーフォームで呼び出すの方が適切だったかな
893:デフォルトの名無しさん
20/12/04 15:05:45.91 QvMd2aQjM.net
個人的な好みだけどそのフォーム内でしか使わないならPrivate Subでサブルーチン作っちゃうかなぁ
クラスモジュールとフォームの両方から呼び出したいとかだと標準モジュールに書かざるを得ないけど
まぁそれにしてもプロシージャの頭にコメントで処理名、機能、引数、返り値、備考を書くようにはしてるからそこに何処から呼んでるかとかぐらいは書いておくけど
894:デフォルトの名無しさん
20/12/04 15:08:50.81 NJplFCDqM.net
どうでもいいんじゃない？
モジュール化云々が問題になるような粒度の責務をVBAに負わせている時点でシステム全体の設計を疑ったほうがいい
895:デフォルトの名無しさん
20/12/04 15:29:16.67 UF2xE4cEH.net
>>887
確かにワークブックイベントでユーザーフォームのpublic Subが呼び出せなかったからどこに書いたらいいのか迷ってしまったんだ
クラスの理解はなかなか難しい
参考になりました！
896:デフォルトの名無しさん
20/12/04 17:33:04.77 9AUT9QCq0.net
中学数学からはじめる微分積分
URLﾘﾝｸ(www.youtube.com)
中学数学からはじめる相対性理論
URLﾘﾝｸ(www.youtube.com)
中学数学からはじめるAI(人工知能)のための数学入門
URLﾘﾝｸ(www.youtube.com)
中学数学からはじめる三角関数
URLﾘﾝｸ(www.youtube.com)
897:デフォルトの名無しさん
20/12/04 22:21:10.08 +mljwe0d0.net
クラスで挫折したけどユーザー定義型で大満足です
898:デフォルトの名無しさん
20/12/06 04:50:03.54 hAx1GypdM.net
汎用性が高そうなのは標準モジュールにするぐらいの適当さでいいよ
VBAのメリットは手軽に書けるとこだし
それより出来るだけメソッドで処理を区切るといいよ
メソッド名で何してる部分なのか分かりやすくなるし、
変数の使い回しが避けられたり、コピペしやすくなったりメリットが多い
899:デフォルトの名無しさん
20/12/06 10:12:36.99 j9ZLT2ad0.net
必要なパラメータが少なければな
毎回フォームのValue読むとか最低だし
900:デフォルトの名無しさん
20/12/06 12:03:36.23 /svRxsbg0.net
課題が集約されてるサイトとかありますか？
検索してもIf文を使ってなど基本問題しかなく、もっと実用的なツール作成などの課題が欲しいです
901:デフォルトの名無しさん
20/12/06 12:46:36.44 q9M2MiSg0.net
こんなツールが欲しいってのを作ればいいじゃん
902:デフォルトの名無しさん
20/12/06 17:40:13.12 hPxm9AMa0.net
>>894
課題が集約されたくなるBGM
URLﾘﾝｸ(www.nicovideo.jp)
903:デフォルトの名無しさん
20/12/06 22:20:11.18 sERfGt0q0.net
もう課題じゃなく必要なものを作ればいいんじゃね
必要なものがないなら何で勉強してんだよ
904:デフォルトの名無しさん
20/12/07 03:29:03.52 yHI9MFHB0.net
欲しいのは課題じゃなくて解答だろう
905:デフォルトの名無しさん
20/12/07 16:02:20.71 jH6ow3A+a.net
ここに見つけた課題の質問はするなよ
906:デフォルトの名無しさん
20/12/07 16:07:44.46 6Oxb+EmAM.net
VBAなんて解説サイト沢山あるんだから、
その場その場で分からない所をググればいいんじゃないの
カンニングokの試験のために勉強するようなもん
時間の無駄
907:デフォルトの名無しさん
20/12/07 21:46:54.62 MfiN0qq40.net
ここで質問する人の検索能力
908:デフォルトの名無しさん
20/12/07 22:20:43.96 x2seJpDD0.net
能力以前に検索する気が
909:デフォルトの名無しさん
20/12/07 22:30:31.51 heoFqJclM.net
検索語の先頭にはvbaを書くのが基本
910:デフォルトの名無しさん
20/12/07 22:57:19.40 JFqExP+fa.net
検索するより聞いた方が早いとか思ってる初心者
911:デフォルトの名無しさん
20/12/08 00:07:01.16 /yTvtqo50.net
>>894ですがレスくれた方どうもです
作りたいもの作れってのはその通りなんですけど特になくて...
依頼されて作るのは楽しくて会社でもツール作成をやらせてもらってるんですが、家でも勉強がてら何か作りたくてレスした次第です
作りたいもの考えることにします
912:デフォルトの名無しさん
20/12/08 00:16:40.59 2H+tIWVU0.net
無いよそんなの
913:デフォルトの名無しさん
20/12/08 01:50:26.85 xto6xTql0.net
いつもののあいつだぞ
914:デフォルトの名無しさん
20/12/08 02:39:59.03 jyeEIiAS0.net
まわりが振り回されるだけ
915:デフォルトの名無しさん
20/12/08 06:50:25.81 IqyEdS5t0.net
作りたいもの無いなら筋トレでもしてた方がマシやろ
916:デフォルトの名無しさん
20/12/08 20:06:03.71 lRTQaMU80.net
ピボットフィールド名に変数を使うとエラーになりました。
変数は使えないのでしょうか？何か方法あれば教えてください。
.Sheets("X").PivotTables("Y").PivotFields（変数）
917:デフォルトの名無しさん
20/12/08 20:15:21.56 XcMxA1Lma.net
またおm
918:デフォルトの名無しさん
20/12/08 20:25:01.68 pmTkuroL0.net
職場が古臭い超巨大組織で、EXCELしか使えないからVBA
勉強してるんだけど、柔軟というか互換性重視しすぎというか
何でも許しすぎというか（暗黙のなんちゃらが多い）、てんこ
盛りすぎて使いにくいなこれ…
継承無いのも地味に痛い。普段めったに使わないけど、「ここは
インヘリタンスとポリモーフィズムっしょ」ってところで使えない。
919:デフォルトの名無しさん
20/12/08 20:34:22.37 XcMxA1Lma.net
>>912
920: そのまま上司に言えばいいんじゃね
921:デフォルトの名無しさん
20/12/08 20:56:41.26 lRTQaMU80.net
自己解決しました
お騒がせしました
922:デフォルトの名無しさん
20/12/08 21:38:29.64 eufCS9w40.net
クラスじゃダメなんですか？
923:デフォルトの名無しさん
20/12/08 21:50:04.46 pmTkuroL0.net
>>913
EXCELで絵が描けるってだけで驚く職場ですわ。
「python とかC# か、せめてJAVAを…」って言ったら
py の時点で「はあ？」になって、「上司の自尊心を傷つけた
角」で有罪ｗ
924:デフォルトの名無しさん
20/12/08 22:09:36.03 /3eNQIe50.net
何か覚えたら人に知ったかぶりたくなる小学生じゃないんだからさ…
925:デフォルトの名無しさん
20/12/08 22:26:44.03 eufCS9w40.net
こんなのが職場にいたらちょっと困ります
926:デフォルトの名無しさん
20/12/09 01:31:58.28 6n7tUtuW0.net
すげぇ早口でオタギレしてそう
927:デフォルトの名無しさん
20/12/09 01:41:07.54 AZek/pZva.net
VBAがなくなると脅されています
その時にはVBSもなくなりますか？
928:デフォルトの名無しさん
20/12/09 02:14:11.71 WuZTb4kZM.net
無くならなくないよ！目を覚ませ！！！
929:デフォルトの名無しさん
20/12/09 02:18:54.70 aFDIkFBR0.net
>>920
ソース出せよ、あとどこからいつなくなるのかによる
930:デフォルトの名無しさん
20/12/09 02:53:27.53 jODQKuwy0.net
URLﾘﾝｸ(www.bulldog.co.jp)
931:デフォルトの名無しさん
20/12/09 08:12:10.11 DDb5ExOLM.net
西日本では中濃は殆ど見かけない
932:デフォルトの名無しさん
20/12/09 09:50:23.00 jODQKuwy0.net
URLﾘﾝｸ(www.otafuku.co.jp)
933:デフォルトの名無しさん
20/12/09 09:53:21.34 QFKNxFhfM.net
目玉焼きには中濃ソース派
934:デフォルトの名無しさん
20/12/09 13:03:56.69 TZVf/s/B0.net
>>916
典型的な無知無能の知ったかオタク馬鹿
935:デフォルトの名無しさん
20/12/09 17:45:40.43 HptS3Gf+H.net
クラスを変数の格納で試しに使ってみたけど、値渡しのときに複数のsheetやRangeを一つのobjectとして送れるのが便利だった
それがいいのか悪いのかもすら分からんけど
あと宣言を減らせるのもいいな
936:デフォルトの名無しさん
20/12/09 19:30:15.22 Q1uyX9N5M.net
>>928
それって単なるTypeで定義するのとなんか違うの？
937:デフォルトの名無しさん
20/12/09 21:52:52.42 bJuEauhPM.net
>>912
PowerShellはダメなのか？
Windowsに最初から入ってるし継承使えるけど
938:デフォルトの名無しさん
20/12/10 01:02:36.47 8uzpk1TB0.net
互換性というより下手な拡張のせいだと思うが
a&b&c と書けないのがムカつく
939:デフォルトの名無しさん
20/12/10 01:11:19.37 32G50CXp0.net
すでに引いてある枠線をすべてオートシェイプに置き換えることはできますか？
一括で変換できれば楽なんですが
そのようなことをしたい理由はExcelは先の太さのバリエーションがないのでオートシェイプで任意の太さの線にしたいからです
940:デフォルトの名無しさん
20/12/10 01:16:47.80 8uzpk1TB0.net
俺はしたいと思わないな
941:デフォルトの名無しさん
20/12/10 01:50:46.90 gCkd//in0.net
いつものあいつだろ
942:デフォルトの名無しさん
20/12/10 02:22:09.00 MSCfGM6q0.net
>>932
君ならできるだろ
943:デフォルトの名無しさん
20/12/10 03:30:03.52 YXjbRyJb0.net
ヤればできる！
避妊は忘れずに！
944:デフォルトの名無しさん
20/12/10 08:21:16.51 VUmLGrN10.net
何かもうここ機能していないですね
荒らししかいない感じだ
945:デフォルトの名無しさん
20/12/10 10:17:08.09 2F+mzzJFM.net
なら、お前が質問しろよ！
946:デフォルトの名無しさん
20/12/10 10:17:31.42 2F+mzzJFM.net
なら、お前が質問しろよ！
947:デフォルトの名無しさん
20/12/10 10:44:14.39 nD6J7euLd.net
>>932
できる
948:デフォルトの名無しさん
20/12/10 17:55:13.02 mXX17fjdH.net
>>929
読み取り専用にしたいとか変数格納時にチェックしたいとかかなあ
typeもろくに使ってないから難しい質問
949:デフォルトの名無しさん
20/12/10 18:15:54.30 cag4gSad0.net
>>941
まあそう言う要件あるならそりゃクラスにするしか無いわな
950:デフォルトの名無しさん
20/12/10 20:13:35.89 tORGV15wa.net
>>932
一回しか行わないわけだし手でやるのが普通ですよ
それにセルのサイズ変えたらズレるし
全部のセルの罫線みるのにどんだけ掛かるかw
951:デフォルトの名無しさん
20/12/10 20:47:29.63 8uzpk1TB0.net
どんだけ掛かるんだ？
952:デフォルトの名無しさん
20/12/10 21:11:52.00 CqzKSDKw0.net
Ｃ列になし、0、文字列があって、
条件分岐で
C列が文字列であれば転記する文字列をそれに変更。転機列のD列には転記しない
Ｃ列がなしであれば同じ行のＤ列を見に行ってブランクであれば文字列を転記、文字が既にあれば転記しない
Ｃ列が0であれば次の文字列まで移動
上記のようなのは関数だと不可能だと思うので、マクロでどのように作ればいいでしょうか
953:デフォルトの名無しさん
20/12/10 21:12:58.79 DnhQvLL+0.net
その通り作ればいいですよ
954:デフォルトの名無しさん
20/12/10 21:21:26.02 gchHSEuY0.net
>>945
>Ｃ列がなしであれば同じ行のＤ列を見に行ってブランクであれば文字列を転記、文字が既にあれば転記しない
この意味が分からんのだけど誰か翻訳頼む。
955:デフォルトの名無しさん
20/12/10 21:43:23.69 kT+M3PHp0.net
ある程度自分で考えてそれでもわからない部分を聞くとかならともかく、丸投げ質問はスルーでおk
956:デフォルトの名無しさん
20/12/10 21:46:13.21 62ZBW9sZ0.net
>>947
自分はむしろ
「C列が文字列であれば転記する文字列をそれに変更」
の方が分からん
957:デフォルトの名無しさん
20/12/10 21:49:42.57 v6PrCrQZ0.net
この手のタイプは自分の見てるものが他人には見えてないってことがいつも抜け落ちてる
958:デフォルトの名無しさん
20/12/10 21:55:21.01 TqxHVWGz0.net
仮に転記文字列がEなら
Cが0(数値)
次のCまで移動
Cがなし
D列がブランクならEからDに転記
Cが文字列
EをCの文字列に変更、Dはそのまま
じゃないの？
でもなしとブランクが分かれてるのが謎
959:デフォルトの名無しさん
20/12/10 22:36:37.55 CqzKSDKw0.net
すいませんちょっと言葉が足りませんでした。
なしは単なる文字列のなしです
IFでなしという文字列があれば、現在設定している文字列をD列に書き出していく処理になります
Ｃ列 Ｄ列
りんご
なし
0
0
みかん
なし
↓
Ｃ D
りんご (ブランク)
なし りんご
0 (ブランク)
0 (ブランク)
みかん (ブランク)
なし みかん
上記のような処理を作りたいです。
960:デフォルトの名無しさん
20/12/10 22:48:25.04 56YuvF2X0.net
どうぞ作ってください。
961:デフォルトの名無しさん
20/12/10 22:56:25.81 CqzKSDKw0.net
条件分岐の所だけでもこういう感じで作ればいいというような回答を頂ければ助かります
かなり丸投げな質問になってすいません
962:デフォルトの名無しさん
20/12/10 22:57:22.97 YXjbRyJb0.net
四角投げくらいかな？
963:デフォルトの名無しさん
20/12/10 22:59:02.40 5Pf17kEC0.net
ちょっとみただけだけど関数でも頑張れば
作れそうに見えるがどうだろうか
964:デフォルトの名無しさん
20/12/10 23:05:18.21 DnhQvLL+0.net
回答しても助けになりそうも無い
965:デフォルトの名無しさん
20/12/10 23:06:01.55 5Pf17kEC0.net
別に頑張らなくても関数で出来た
頭硬すぎだろう
966:デフォルトの名無しさん
20/12/10 23:24:54.94 A+NuqwaS0.net
なしって入ったときに出てくるのがなしの1個上のセルの内容と決まってるなら関数でも書けるね
967:デフォルトの名無しさん
20/12/10 23:35:14.23 gchHSEuY0.net
このなぞなぞを思い出した
URLﾘﾝｸ(nazo2.myaasensei.com)
なしなら「梨」と表記するか
別の果物、ぶどうとかすればいいのに
紛らわしい
968:デフォルトの名無しさん
20/12/10 23:53:09.24 v6PrCrQZ0.net
>>952
その条件通りにそのまま書き起こせば実現できることじゃないのか、複雑な処理がいるわけでもなし
969:デフォルトの名無しさん
20/12/11 00:21:36.40 bQCq39tb0.net
関数で作れるならヒントでも頂けませんでしょうか
すいません。
970:デフォルトの名無しさん
20/12/11 00:36:40.44 2rJlNOe/0.net
=if(C1=″なし″,offset(C1,0,-1),″″)
こんな感じか
971:デフォルトの名無しさん
20/12/11 00:37:35.18 bQCq39tb0.net
スレッド眺めましたがまともに答えてる人ここはあまりいないんですね
失礼しました
972:デフォルトの名無しさん
20/12/11 00:41:08.86 Lka/LNP10.net
まともな質問をしましょう
973:デフォルトの名無しさん
20/12/11 00:44:14.37 6Y+QuIqT0.net
流と関係ないけどここの人ってVBAはもちろんだけど関数も糞詳しいんだよなあ
VBAが関数の上位互換みたいなとこあるから当然か
SQRTとかここで教わったりセルの書式設定の代わりにVBAとかめちゃくちゃ助けてもらったわ
974:デフォルトの名無しさん
20/12/11 00:46:54.57 RI9UvvOD0.net
上位互換じゃなくて全く同等。
lambda関数導入でチューリング完全になったからね。
975:デフォルトの名無しさん
20/12/11 01:01:39.09 bQCq39tb0.net
>>963
それだと、なしの横にりんごやみかんの文字列が表示されませんでした
976:デフォルトの名無しさん
20/12/11 01:47:52.19 sk80MZxp0.net
シート関数でもVBAでもどっちでもいいけど組むにあたってどの部分で詰まってるわけ？
977:デフォルトの名無しさん
20/12/11 02:06:21.43 vUB51gLL0.net
>>968
馬鹿は死ねば？
978:デフォルトの名無しさん
20/12/11 02:21:17.12 bQCq39tb0.net
>>969
質問の仕方が下手ですいません
Ａ列 Ｂ列
文字列Ａ 空欄
空欄1 文字列Ａ
空欄1 文字列Ａ
文字列Ｂ 空欄
空欄2 文字列Ｂ
空欄2 文字列Ｂ
空欄2 文字列Ｂ
・
・
・
のようなシートがあって、IFでＡ列が空欄であれば文字列Ａ、文字列Ｂのような転記を
機械的に行いたいのですが、関数を使ってIFの真偽判定で
文字列Ａがヒットすれば、Ｂ列への転記内容を文字列Ａ、文字列Ｂがヒットすれば文字列Ｂというような、
VBAのValueのような変数に文字列を格納しながら転記してく事が関数で可能か知りたかった内容です。
Ａ列の文字列Ａを空欄1にコピーして、文字列Ｂを空欄2にコピーするという操作もあればそっちも教えて頂きたい
(VLOOKUP等で文字列を参照する事が出来そうなので)
979:デフォルトの名無しさん
20/12/11 02:26:17.07 egj/vl+4M.net
いつものあいつっぽい
980:デフォルトの名無しさん
20/12/11 02:32:32.38 t8ktWZN00.net
>>945
D列がブランクかどうかを調べる必要があるので、転記列をE列、さらに作業列をF列として
C列はC2からデータ
D列はD2からデータ
E列はE2から =IF(C:C="なし",IF(D:D="",F:F,D:D),"")
F列はF2から =IF(AND(C:C<>"なし",C:C<>0),C:C,IF(INDEX(F:F,ROW()-1)="","",INDEX(F:F,ROW()-1)))
なし以外の文字列が最初にC列に出てくるまでは、とりあえずE列は空欄になる。
981:デフォルトの名無しさん
20/12/11 02:47:05.93 t8ktWZN00.net
>>971
それなら、C列を作業列として
A列にA2からデータ
B列はB2から =IF(A:A="",C2,"")
C列にC2から =IF(A:A="",C1,A2)
でB,C列をドラッグで、では？
982:デフォルトの名無しさん
20/12/11 07:09:43.08 pv/aap0P0.net
創作系は怠け者に厳しいから
こうやったけどうまくいかないってのは直してくれるが１から作ってってのはなあ
983:デフォルトの名無しさん
20/12/11 08:01:05.41 xHfuP7vB0.net
>>952
0以外の数値も文字列に含めて、空白を停止フラグにした
これであってる？
Dim LastValue
LastValue = "未入力"
Dim Row As Range
For Each Row In Range("A:B").Rows 'A:B範囲を一行ずつ
Dim AColumn As Range, BColumn As Range
Set AColumn = Row.Columns(1) '処理中の行の一列目をAColumn
Set BColumn = Row.Columns(2) '処理中の行の二列目をBColumn
If (AColumn.Value = "") Then Exit For '空白で停止
If (AColumn.Value Like "なし") Then
If (BColumn = Empty) Then BColumn.Value = LastValue
ElseIf (AColumn.Value <> 0) Then
LastValue = AColumn.Value
End If
Next
984:デフォルトの名無しさん
20/12/11 08:34:39.24 xHfuP7vB0.net
>>971
ワークシート関数で、条件付きで最後にある値を取るのは面倒だと思う
Filter関数とVlookup関数でできなくはないけど
985:デフォルトの名無しさん
20/12/11 12:26:50.51 A055qJ39d.net
ifのあとカッコで書けるのかしらなんだわ
986:デフォルトの名無しさん
20/12/11 13:05:38.72 wz04rSM4r.net
974さんのやり方にinblankを付け足して解決出来ました
ありがとうございました。
987:デフォルトの名無しさん
20/12/11 13:07:41.53 5MdaedDCM.net
>>978
単に 式をカッコで包んでるだけ
A = B + 1
を
A = (B + 1)
と書くのと同じ
988:デフォルトの名無しさん
20/12/11 14:46:49.15 UAef87jg0.net
カッコも式の一部だから書くのは自由だけど処理上はまったく意味がない
たとえばこれでも別にエラーにはならない
If (((((a)) = ((b))))) Then
989:デフォルトの名無しさん
20/12/11 14:57:01.16 7k+CWJkj0.net
zipファイルを解凍して別フォルダにコピー後にzipファイルと元の解凍ファイルをfso.deletefolderでまとめて削除するvba作ってるんだけどもなんでかzipファイルだけ削除できないんやがなんでや
990:デフォルトの名無しさん
20/12/11 15:00:25.68 g30meLDD0.net
解凍処理の方でまだ掴んでるとかは？
991:デフォルトの名無しさん
20/12/11 16:18:51.11 xfvmoUwoM.net
>>978
見やすくていいでしょ
おすすめ
992:デフォルトの名無しさん
20/12/11 17:17:16.62 A055qJ39d.net
おう、マネささて頂きますわ
993:デフォルトの名無しさん
20/12/11 18:12:09.99 f/nqGphBa.net
>>981
そんなにカッコつけるなよ
994:デフォルトの名無しさん
20/12/11 18:17:33.57 YQ4SKnSdM.net
囲えるくらいの甲斐性を見せろよ
995:デフォルトの名無しさん
20/12/11 19:03:37.76 RI9UvvOD0.net
FUCK (((((●)) = ((●))))) 凸 YOU
996:デフォルトの名無しさん
20/12/11 20:45:59.99 u1KAArwg0.net
ウンコ
997:デフォルトの名無しさん
20/12/12 12:26:43.87 D0KYkpwQ0.net
Office田中の人生きてるの？
突然Youtubeの更新が止まって数ヵ月過ぎた。
998:デフォルトの名無しさん
20/12/12 13:02:18.19 cNsXl+Rv0.net
Excel関数のHyperLinkの処理を置き換え(APIHookのような処理)はどうすればできますか？
目的としてはHyperLink関数では一部のURLの表示が遅い(Excel自体のタイムアウト待ち？)ので
直接「CreateObject("WScript.Shell").Run URL文字列」の処理をさせたいのです
関数名はHyperLinkのままにしたいのでAPIHookのような処理ができればいいのですが
999:デフォルトの名無しさん
20/12/12 14:44:07.78 goTAsgOP0.net
またおまんこ
1000:デフォルトの名無しさん
20/12/12 16:50:49.73 8ELulHCK0.net
>>990
普通にセミナー開いてたよ
つべは単に再生回数取れないから休止してるんでしょ
1001:デフォルトの名無しさん
20/12/12 17:03:16.57 EozP8xdo0.net
動画じゃコピペできないもの
1002:デフォルトの名無しさん
20/12/12 17:30:46.03 D0KYkpwQ0.net
>>993
そうか。
動画では💩上から目線で💩偉そうだったから生きてないのかと思った。
1003:デフォルトの名無しさん
20/12/12 17:59:55.44 XTq8+BP7M.net
この三年でこのスレの人に救われた事が多すぎて感謝の念しかない
VBAどころかエクセルすら使わない仕事に変わるけど本当にみんなありがとう
1004:デフォルトの名無しさん
20/12/12 18:37:52.11 wCNFFbhJ0.net
>>994
コメント欄に数式とかソース貼っとけばいいじゃん
1005:デフォルトの名無しさん
20/12/12 20:08:39.70 8ELulHCK0.net
>>995
まあまあ、あの方のひととなりは業界では知る人ぞ知るで有名だから。
実際にトップクラスのテクニックの持ち主には間違いないからしゃーない
1006:デフォルトの名無しさん
20/12/12 20:25:22.78 D0KYkpwQ0.net
>>998
いやプログラミングの業界で働いてたらあのくらいのスキルは低レベル。
それよりExcelのVBAごときで偉そうにしてるのは井の中の蛙。
あの人の周りには大量の低レベル社員が群がっているのだろう。
そんな低レベルの人が質問をしてきてそれに答えるばかりしているから自分が頭いいと勘違いしてるだけ。
もっと高レベルなプログラマーを目指してほしい。
こういう現象は高学歴な人が人生の早い段階でつまずき
予備校教師を目指す、というのにも見られる。
せっかく高学歴なんだからもっと自分のやりたいことに精力をそそげばいいのにね。
教育界で偉そうにすることしかできなくなった落ちこぼれ。
1007:デフォルトの名無しさん
20/12/12 20:52:45.95 FxA0JWZG0.net
自称高レベル君乙w
1008:1001
Over 1000 Thread.net
このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 104日 8時間 57分 19秒
1009:過去ログ ★
[過去ログ]
■ このスレッドは過去ログ倉庫に格納されています