1 名前:デフォルトの名無しさん [2023/01/28(土) 12:12:12.41 ID:UjlIZ1Ov0.net] !extend:checked:vvvvv:1000:512 !extend:checked:vvvvv:1000:512 ↑同じ内容を3行貼り付けること ExcelのVBAに関する質問スレ コード書き込みや作成依頼もOK 次スレは>>980 が立てること 無理なら細かく安価指定 ※前スレ Excel VBA 質問スレ Part77 https://mevius.2ch.net/test/read.cgi/tech/1658009255/ Excel VBA 質問スレ Part78 https://mevius.2ch.net/test/read.cgi/tech/1667104996/ VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured
856 名前:デフォルトの名無しさん (ワッチョイ 7d9a-/sIl) [2023/10/02(月) 12:25:48.10 ID:ld9+k8U+0.net] >>反応しません ってので見てるとこがね…
857 名前:デフォルトの名無しさん (ワッチョイ 7d9a-/sIl) [2023/10/02(月) 12:26:02.80 ID:ld9+k8U+0.net] >>反応しません ってので見てるとこがね…
858 名前:デフォルトの名無しさん [2023/10/11(水) 12:18:31.21 ID:VviNns4z0.net] vbaを含むxlsmファイルのライセンスってどこに含めるのが一般的ですか?
859 名前:デフォルトの名無しさん [2023/10/11(水) 12:24:39.89 ID:nuQ0rfxo0.net] つくったとこじゃね
860 名前:デフォルトの名無しさん (ブーイモ MM1d-YcX+) mailto:sage [2023/10/15(日) 13:46:37.05 ID:f8ckKaeDM.net] VBA使えなくなるんですか??? https://gigazine.net/news/20231012-microsot-kill-off-vbscript/
861 名前:デフォルトの名無しさん (ワッチョイ 131f-ty0S) mailto:sage [2023/10/15(日) 13:55:09.75 ID:vVffQC480.net] YES
862 名前:デフォルトの名無しさん (ワッチョイ fbbf-3tBr) [2023/10/15(日) 14:15:54.32 ID:BVKbSlte0.net] >>852 馬鹿
863 名前:デフォルトの名無しさん mailto:sage [2023/10/15(日) 14:24:09.38 ID:vRG6kfBHM.net] VBSとVBAは別物なのでまだ当面使えなくなることはないだろうけどそろそろ別の手段を考え始めた方が良さげな感じではある
864 名前:デフォルトの名無しさん (ワッチョイ 7b77-fsiV) mailto:sage [2023/10/15(日) 15:28:22.49 ID:j1k0qbJm0.net] セキュリティリスクだからVBA使うなって会社もそろそろ増えてきてるだろうしな
865 名前:デフォルトの名無しさん [2023/10/15(日) 17:42:26.62 ID:H9M8XB6j0.net] excelが悪い
866 名前:デフォルトの名無しさん mailto:sage [2023/10/16(月) 09:17:56.44 ID:1jmJ2+9pM.net] もう今はExcelとVBAではなくモダンExcelとPowerPlatformの時代
867 名前:デフォルトの名無しさん [2023/10/16(月) 09:59:53.14 ID:kgcCjrnKa.net] >>856 同じ理由ならpowershellも廃止すべきでは
868 名前:デフォルトの名無しさん (ワッチョイ 2bf7-xRLz) [2023/10/17(火) 07:51:58.43 ID:mIHb8CZV0.net] 自分が使わなければいいだけでしょ
869 名前:デフォルトの名無しさん mailto:sage [2023/10/18(水) 10:45:13.63 ID:BxVgF2oz0.net] なんでやねん、説明して
870 名前:デフォルトの名無しさん mailto:sage [2023/10/18(水) 11:05:14.43 ID:IL9b7uemd.net] >>861 スレチなので当該スレでやって
871 名前:デフォルトの名無しさん mailto:sage [2023/10/19(木) 20:33:49.11 ID:k8TjAFfd0.net] ACCESSの連結フォームのように、Excelのセルとフォームを簡単に連動させるテクニックはありますか?
872 名前:デフォルトの名無しさん mailto:sage [2023/10/19(木) 20:36:45.56 ID:k8TjAFfd0.net] ACCESSの連結フォームのように、Excelのセルとフォームを簡単に連動させるテクニックはありますか?
873 名前:デフォルトの名無しさん mailto:sage [2023/10/19(木) 20:37:04.09 ID:k8TjAFfd0.net] ACCESSの連結フォームのように、Excelのセルとフォームを簡単に連動させるテクニックはありますか?
874 名前:デフォルトの名無しさん mailto:sage [2023/10/19(木) 20:37:18.34 ID:k8TjAFfd0.net] ACCESSの連結フォームのように、Excelのセルとフォームを簡単に連動させるテクニックはありますか?
875 名前:デフォルトの名無しさん mailto:sage [2023/10/19(木) 23:17:38.32 ID:3q17UY2e0.net] Excelのセルを使ってVBAソースを作る 似たような式をフィルでズズーと作ると気持ちいいぞ
876 名前:デフォルトの名無しさん (ワッチョイ 5901-Q3Hg) mailto:sage [2023/10/20(金) 03:27:46.40 ID:mGpX8NcL0.net] >>867 狙ったとこだけ変えるテクを教えてください
877 名前:デフォルトの名無しさん mailto:sage [2023/10/20(金) 18:26:19.01 ID:YxHuWP400.net] これを参考にしてみて、この程度でいいならいちばんシンプル https://forest.watch.impress.co.jp/docs/serial/exceltips/1208637.html もっと深く踏み込んだのが欲しければ、ここで在庫管理とかを解説してる 真似するだけで、かなりのものに仕上がる https://www.minizaiko.com/entry/ZaiSis102
878 名前:デフォルトの名無しさん mailto:sage [2023/10/21(土) 03:50:37.64 ID:4nC0eILg0.net] >>866 RowSourceとかControlSourceとか https://learn.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/listbox-control-boundcolumn-controlsource-rowsource-properties-example >>869 今のエクセル、入力用フォーム自動生成してくれるのか もう無茶苦茶な機能追加だな でも自分でそのフォームカスタマイズできないのは魅力半減だな
879 名前:デフォルトの名無しさん mailto:sage [2023/10/21(土) 03:54:30.35 ID:+5aGT6RT0.net] 設定ファイルを書き換えればカスタマイズできる
880 名前:デフォルトの名無しさん mailto:sage [2023/10/25(水) 10:36:26.65 ID:eJmjtmbA0.net] Excelなのですが、複数セルに条件付き書式を一括で追加したいです。(条件は各行変化する) FomulaとFormatConditions.addを組み合わせる様な事をしたいのですが、 実際やるとエラーで通りません。 例えば FormatConditions.Add(2,3, '=A2TRUE') と言った具合で、範囲で追加したときAの値A2,A3,A4と変化させたい感じです。 また別言語(Powershell)から呼び出しているのでWith構文は使えないと思います。 Forで回しても良いのですが、1000行近くあるので時間が結構かかる為避けたいです。
881 名前:デフォルトの名無しさん [2023/10/25(水) 12:26:50.69 ID:SA71alYG0.net] もっとよく考えたほうがいいと思う
882 名前:デフォルトの名無しさん mailto:sage [2023/10/25(水) 20:06:44.00 ID:FhNheB/20.net] >>872 1000行なんてパソコンにとっては全然多くない どうやろうが一瞬で終わる程度の量 そんな作業はどう考えてもForで回した方が速い
883 名前:デフォルトの名無しさん (ワッチョイ 7ae6-dytz) mailto:sage [2023/10/26(木) 11:27:43.31 ID:0owHhtRH0.net] VBA内なら1000行すぐ終わるかも知れませんが Powershellから呼び出しだと結構時間かかります 試しにComObject作成して確認してみて下さい
884 名前:デフォルトの名無しさん (スップ Sd7a-JD/u) mailto:sage [2023/10/26(木) 11:37:44.62 ID:q3pE0MJPd.net] 最初の質問から24時間以上経過してるけど、その間にパソコンを動かしてたら遅い方法でもとっくに終わってたやろうなあ
885 名前:デフォルトの名無しさん (スッププ Sd9a-pqHO) mailto:sage [2023/10/26(木) 11:38:24.30 ID:ewuxy2JXd.net] 実際のセルの処理は時間がかかる 描画を止めてから処理すれば多少早くなるから、 Application.ScreenUpdating=Falseしてから処理をはじめ、 終わったらApplication.ScreenUpdating=True 計算処理も同様に Application.Calculation = xlCalculationManual やってからはじめて、 Application.Calculation = xlCalculationAutomaticでおえる
886 名前:デフォルトの名無しさん (スッププ Sd9a-pqHO) mailto:sage [2023/10/26(木) 11:39:48.79 ID:ewuxy2JXd.net] >>876 何度も使うつもりなら速いに越したことはないでしょ 一回切りなら尤もな話だけどさ
887 名前:デフォルトの名無しさん (ワッチョイ 7ae6-dytz) mailto:sage [2023/10/26(木) 12:19:58.33 ID:0owHhtRH0.net] 質問取り下げます まともに回答するつもりの方いない様なので 書き込む前から雰囲気悪いなと思ったけどやっぱりか・・
888 名前:デフォルトの名無しさん mailto:sage [2023/10/26(木) 12:46:23.38 ID:UgEvltp9M.net] 変化する条件を一括設定したい これだけ聞いたら「もう少し考えたら?」の回答しか出ないよ
889 名前:デフォルトの名無しさん mailto:sage [2023/10/26(木) 14:25:49.72 ID:w9aGlpnFd.net] >>879 与えられた条件で速くなりうる手段を考えて回答したのに、 まともな回答じゃないって判断されたんだね 考える時間もレスする時間も無駄にしたわ
890 名前:デフォルトの名無しさん mailto:sage [2023/10/26(木) 14:46:30.23 ID:Sxr6n1fv0.net] > VBA内なら1000行すぐ終わるかも知れませんが > Powershellから呼び出しだと結構時間かかります これよくわからない 時間がかかってるのはExcelの起動やらとかであって、Forの実行はVBA内で行われるんじゃないの?
891 名前:デフォルトの名無しさん mailto:sage [2023/10/26(木) 14:51:50.68 ID:ZtFvM5yP0.net] 取り下げたんだからもう良いんじゃねw 自分の恥ずかしいところとか見つかったんだろうよw
892 名前:デフォルトの名無しさん (ワッチョイ dd4e-CxP9) mailto:sage [2023/10/27(金) 15:12:43.55 ID:fcYuq+zB0.net] >>883 > また別言語(Powershell)から呼び出しているのでWith構文は使えないと思います。 これもよくわからないし Powershellって人がプロシージャに書いてある文章を一行ずつ読みにいって、自己解釈の元で自分で実行するみたいな発想だったのかね ここまで意味不明な解釈してる人がどこで何に気がついたのか知らないけど>>879 の捨て台詞は必要だったのかね そして何よりもID:ewuxy2JXdが不憫で仕方がない
893 名前:デフォルトの名無しさん (ワッチョイ a551-dytz) mailto:sage [2023/10/27(金) 17:17:23.69 ID:NmWpMbd70.net] これからこういう人多く成るんだよ? 高学歴が邪魔するのか何だか知らんけど プライドだけは変な方向に高い 実務に即さない解決策を講じる 選択肢が間違ってても突っ走る
894 名前:デフォルトの名無しさん (ワッチョイ c1a5-ANn9) mailto:sage [2023/10/27(金) 18:21:28.41 ID:HOnfPTgV0.net] ChatGPTでしらべたけどよくわからん、みたいな?
895 名前:デフォルトの名無しさん (ワッチョイ 4ec2-WPgu) [2023/10/27(金) 21:02:38.87 ID:4EmYUF1P0.net] 馬鹿が考える解決方法はそんなもの 馬鹿ほど己の間違え方法にこだわる
896 名前:デフォルトの名無しさん mailto:sage [2023/10/28(土) 00:17:29.34 ID:jY1bWC/90.net] やっている本人しかわからない可能性があることなんていくらでもあるだろう。
897 名前:デフォルトの名無しさん (ワッチョイ 29ca-mA8z) mailto:sage [2023/10/28(土) 06:04:48.34 ID:frVn+RL00.net] セルに○○と打ち込んだ これを.Valueで取ったら"○○" .Textで取ったら" ○○ "になった その前後のスペースはどこから来たんじゃい?
898 名前:デフォルトの名無しさん mailto:sage [2023/10/28(土) 08:55:39.42 ID:GGD6bBOU0.net] >>889 再現しない https://i.imgur.com/6cSraSv.png
899 名前:デフォルトの名無しさん (ワッチョイ 41da-c8RC) mailto:sage [2023/10/28(土) 11:13:55.25 ID:EfsxXat70.net] >>889 朝から寝ぼけたんじゃね
900 名前:デフォルトの名無しさん (ワッチョイ 29ca-mA8z) mailto:sage [2023/10/28(土) 11:19:53.47 ID:frVn+RL00.net] だよなあ 20年やっててこんなこと初めてだわ
901 名前:デフォルトの名無しさん mailto:sage [2023/10/28(土) 15:22:33.56 ID:Jo+R6/p70.net] 馬鹿馬鹿って頻繁に書き込んでる人はよほど優秀なんだろうね。 Excelマクロ教室でも開けば良いのに。
902 名前:デフォルトの名無しさん mailto:sage [2023/10/28(土) 20:44:15.82 ID:13jr+kZc0.net] >>889 セルの書式
903 名前:デフォルトの名無しさん mailto:sage [2023/10/29(日) 01:44:54.53 ID:IGVL7C2J0.net] >>894 標準か文字型 ○○は漢字で、 Cells(1, 1).Text = "○○" がFalseで、 Cells(1, 1).Value = "○○" がTrueになったので、 んなわけあるか!と思ってDebug.Printしたら、 .Textには前後に変な空白があったのよ
904 名前:デフォルトの名無しさん mailto:sage [2023/10/29(日) 10:01:38.54 ID:9r8OlfFd0.net] とりあえずトリムっとけばおk
905 名前:デフォルトの名無しさん mailto:sage [2023/10/29(日) 10:54:39.06 ID:j00+fEWV0.net] 同じやん https://i.imgur.com/ULDMIE0.png
906 名前:デフォルトの名無しさん mailto:sage [2023/10/29(日) 12:32:43.45 ID:T4jRmqRS0.net] >>895 問題のセルがA1だったとして、A1の表示形式を"標準"にする。 (一旦別の表示形式にして"標準"にするのがよい) その状態からF2で一旦入力状態にして、Enterで確定。 これで同じになれば値をどうやって入れたかを調べる。 同じ列の別の行で同じことが起こるか、などいろいろ。 動けばいいんだったら、違うことを前提にして回避策をいれればいい。
907 名前:デフォルトの名無しさん (ワッチョイ 1310-mA8z) mailto:sage [2023/10/30(月) 00:45:58.32 ID:ok297MD20.net] 1セルだけ書式が会計になってたわ >>891 の言うとおりだった すまん しかし、なんで会計だと空白が付くのかという新たな疑問が
908 名前:デフォルトの名無しさん (ワッチョイ 51da-c8RC) mailto:sage [2023/10/30(月) 01:23:46.28 ID:B1G43WsB0.net] >>899 セルや罫線の中で見やすくするためかしら? 桁区切り付き数値にしても、値の後に空白が入る。
909 名前:デフォルトの名無しさん mailto:sage [2023/10/30(月) 10:34:02.92 ID:upgSC0LO0.net] Textはあくまで見た目のデータだからね 書式設定のウインドウでも位置がズレることが確認できるはず 何故かはしらん、マイナスとかついたときの位置を固定するためとかやろ
910 名前:デフォルトの名無しさん mailto:sage [2023/10/30(月) 11:27:34.15 ID:TNhE6eNI0.net] 標準で入ってる書式にもスペース入ってるのあるはず(前はあったが…) あれみた時、見えない爆弾仕込んでるな…と思った
911 名前:デフォルトの名無しさん [2023/10/30(月) 12:07:45.37 ID:RmOFtzKv0.net] 前の空白は数値で付くのはわかるが後ろの空白は謎
912 名前:デフォルトの名無しさん mailto:sage [2023/10/30(月) 12:28:45.35 ID:lBYVOk8eM.net] おそらく非表示の書式文字はアンダーバー+半角スペース1文字
913 名前:デフォルトの名無しさん mailto:sage [2023/10/30(月) 15:52:04.09 ID:lVrtS1Ry0.net] 会計を設定した場合に隙間が空くのは、次のような表示形式が行われるからです _ \* #,##0_ ;_ \* -#,##0_ ;_ \* "-"_ ;_ @_ https://www.officepro.jp/exceltips/tips_format/index16.html 基本のキ
914 名前:デフォルトの名無しさん [2023/10/30(月) 16:33:05.01 ID:upgSC0LO0.net] いやそれが何故かっていう疑問なんじゃないの・・・ (言い換えれば空ける理由、空けなくてもいいんじゃない?っていう疑問だと思う) 答え出るかわからんし闇っぽいから、はい次の方
915 名前:デフォルトの名無しさん mailto:sage [2023/10/30(月) 16:45:21.41 ID:+WHjaEV1d.net] 闇って言いたいだけだろ
916 名前:デフォルトの名無しさん mailto:sage [2023/10/30(月) 22:20:23.95 ID:8XyBI/Ix0.net] 書式設定を変えた時、文字の位置が少し変わるのは知ってたけど、まさかそれを内部的には空白で表現してるとは思わなかったよ
917 名前:デフォルトの名無しさん (ワッチョイ 1387-zW/F) [2023/11/01(水) 01:09:45.26 ID:hjpDJv/i0.net] 【質問】 Excelのソートに関しての質問です。 ①シートの1列目の文字列に基づいて昇順でソートする。 ②シートの1列目の文字列の先頭に「○」や「☆」などの記号がある場合は、それらを無視して2文字目の文字に基づいてソートしたい。 そこで下記コードを実行したところ、 「実行時エラー '1004': 並べ替えの参照が正しくありません。」というエラーが出ます。 どこをどう修正すればよいでしょうか?
918 名前:デフォルトの名無しさん (ワッチョイ 1387-zW/F) [2023/11/01(水) 01:11:37.64 ID:hjpDJv/i0.net] Sub CustomSort() Dim LastRow As Long Dim SortRange As Range Dim SortKeyRange As Range Dim i As Long With ActiveSheet LastRow = .Cells(.Rows.Count, 1).End(xlUp).Row Set SortRange = .Range("A2:A" & LastRow) Set SortKeyRange = .Range("B2:B" & LastRow) .Sort.SortFields.Clear .Sort.SortFields.Add Key:=SortRange, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal .Sort.SetRange SortRange .Sort.Header = xlNo .Sort.MatchCase = False .Sort.Orientation = xlTopToBottom .Sort.SortMethod = xlPinYin .Sort.Apply End With
919 名前:デフォルトの名無しさん (ワッチョイ 1387-zW/F) [2023/11/01(水) 01:12:11.61 ID:hjpDJv/i0.net] For i = 2 To LastRow If Left(SortKeyRange(i, 1), 1) Like "[○☆]" Then SortKeyRange(i, 1) = Mid(SortKeyRange(i, 1), 2, 1) End If Next i With ActiveSheet .Sort.SortFields.Clear .Sort.SortFields.Add Key:=SortKeyRange, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal .Sort.SetRange SortRange .Sort.Header = xlNo .Sort.MatchCase = False .Sort.Orientation = xlTopToBottom .Sort.SortMethod = xlPinYin .Sort.Apply End With For i = 2 To LastRow If Left(SortKeyRange(i, 1), 1) Like "[○☆]" Then SortKeyRange(i, 1) = "○" & SortKeyRange(i, 1) End If Next i End Sub
920 名前:デフォルトの名無しさん mailto:sage [2023/11/01(水) 03:09:14.48 ID:u6oKBIyz0.net] >>909 何もかも違ってる気がするので丸ごと作り直してみたけど、これで希望の結果になってるかはわからない Sub CustomSort() Dim LastRow As Long Dim SortRange As Range Dim SortKeyRange As Range Dim i As Long With ActiveWorkbook.ActiveSheet LastRow = .Cells(.Rows.Count, 1).End(xlUp).Row Set SortRange = .Range("A2:B" & LastRow) Set SortKeyRange = .Range("B2:B" & LastRow) .Range("A2:A" & LastRow).Copy Destination:=SortKeyRange For i = 2 To LastRow If Left(.Cells(i, 1), 1) Like "[〇☆]" Then .Cells(i, 2) = Mid(.Cells(i, 1), 2, 1) End If Next i With .Sort .SortFields.Clear .SortFields.Add2 Key:=SortKeyRange .SetRange SortRange .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With End With End Sub
921 名前:デフォルトの名無しさん [2023/11/01(水) 03:13:41.64 ID:H7+Ix2LYd.net] >>909 ほぼマルチんこ
922 名前:デフォルトの名無しさん (ワッチョイ 1387-zW/F) [2023/11/01(水) 07:02:30.74 ID:hjpDJv/i0.net] >>912 ありがとうございます。 ただ、そのコードを実行してみたら、ちょっとセルの中身がずれたりしていたので、色々試した結果、下記のコードで解決しました。 Sub CustomSortWithSymbol() Dim LastRow As Long Dim ws As Worksheet Dim i As Long, j As Long, k As Long Dim sortKey As String Dim originalValue As String Set ws = ThisWorkbook.ActiveSheet ' アクティブなシートを設定 LastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row ' 最後の行を取得 Dim sortKeys() As String ' カスタムソートのため、ソートキーを一時的に保持 ReDim sortKeys(1 To LastRow) For i = 2 To LastRow ' ○や☆の文字で始まる文字列の場合、次の3文字をソートキーとして設定 originalValue = ws.Cells(i, 1).Value If Left(originalValue, 1) = "○" Or Left(originalValue, 1) = "☆" Then sortKeys(i) = UCase(Mid(originalValue, 2, 3)) Else sortKeys(i) = UCase(Left(originalValue, 3)) End If Next i
923 名前:デフォルトの名無しさん (ワッチョイ 1387-zW/F) [2023/11/01(水) 07:04:31.49 ID:hjpDJv/i0.net] For i = 2 To LastRow ' ソートキーを使ってソート順を決定 For j = i + 1 To LastRow If sortKeys(i) > sortKeys(j) Then Dim tempKey As String ' ソートキーの順序を入れ替え tempKey = sortKeys(i) sortKeys(i) = sortKeys(j) sortKeys(j) = tempKey Dim tempValue As String ' A列のセルの値も入れ替え tempValue = ws.Cells(i, 1).Value ws.Cells(i, 1).Value = ws.Cells(j, 1).Value ws.Cells(j, 1).Value = tempValue For k = 2 To 10 ' B列~J列のセルの値も入れ替え tempValue = ws.Cells(i, k).Value ws.Cells(i, k).Value = ws.Cells(j, k).Value ws.Cells(j, k).Value = tempValue Next k End If Next j Next i End Sub
924 名前:デフォルトの名無しさん mailto:sage [2023/11/02(木) 01:34:57.09 ID:qnTt38vU0.net] めっちゃ解りやすい。上手ですね
925 名前:デフォルトの名無しさん mailto:sage [2023/11/02(木) 10:47:14.24 ID:I7yCwl+w0.net] いえいえ
926 名前:デフォルトの名無しさん (ワッチョイ f3ad-2XMF) [2023/11/02(木) 12:10:56.31 ID:T6fjkERA0.net] swap関数作るともっと簡単に
927 名前:デフォルトの名無しさん [2023/11/08(水) 19:03:41.59 ID:OdlSvgsbk] 朝からうちのseleniumbasicがエレメントはじいて、 困ってます。 ページ移動やページソースは持ってきてくれますが、 driver.IsElementPresent(myBy.id("xxxx"))や driver.FindElementById ("xxxx")がエラーで、 某サイトのサンプルをコピペしても同じです。エラー↓ ____________________________ 実行時エラー'13': UnknownError unknown error:result.webdriverValue.value list is missing or empty in Runtime.callFunctionOn response (Session info:chrome=119.0.6045.106) (Driver info:chromedriver=118.0.5993.70 (e52f33f3091b4ddfad649acddc39ab570473b86-refs/branch-heads/5993{#12 NT 10.0.19045 x86_64 ーーーーーーーーーーーーーーーーーーーーーーーーーーーー よろしくお願いします。
928 名前:デフォルトの名無しさん [2023/11/09(木) 22:15:08.21 ID:1dy9z0CQM] 解決しました。 https://note.com/yuu________/n/n48b3530b0fe6
929 名前:デフォルトの名無しさん mailto:sage [2023/11/10(金) 14:54:35.91 ID:A5qmTFWx0.net] VBAでスクレイピングをしてるんだが これはOK Set o_elem = Driver.FindElementsByCss("ul.M_pager > li[class = 'next'] > a") これはOK Set o_elem = Driver.FindElementsByCss("ul.M_pager > li[class *= 'next'] > a") これはエラーになる Set o_elem = Driver.FindElementsByCss("ul.M_pager > li[class != 'next'] > a") VBAのFindElementsByCssで!=を使う方法てある? もちろん<>もだめ。
930 名前:デフォルトの名無しさん mailto:sage [2023/11/10(金) 18:46:25.71 ID:W6cpCxu4M.net] ソレってVBAではなくDriverさんの文法ですよね?
931 名前:デフォルトの名無しさん mailto:sage [2023/11/10(金) 20:05:43.07 ID:SDTABjlf0.net] コレでどーなるか ちょっと試してみてもらえるかぬ Set o_elem = Driver.FindElementsByCss(“ul.M_pager > li:not([class = ‘next’]) > a”)
932 名前:デフォルトの名無しさん mailto:sage [2023/11/10(金) 23:38:13.76 ID:A5qmTFWx0.net] >>923 THX それだとエラーはなくなるけど <li class=next><a>も選ばれてしまう。 . ul.M_pager > li:not([class]) > a だとうまくいきました
933 名前:デフォルトの名無しさん mailto:sage [2023/11/11(土) 00:16:15.21 ID:QtW8OgmTd.net] 解決オメだぬ
934 名前:デフォルトの名無しさん (ワッチョイ ff4f-ljUV) [2023/11/12(日) 20:06:42.57 ID:evQWrDt50.net] デスクトップに保存したhtmlファイルを、Shell ("エッジのパス\msedge.exe" & path, vbNormalFocus)で開いています。 んで、そのhtmlファイルには複数個のリンクがあります。 各リンクを自動的にonClick()でクリックするにはどのようにすればいいでしょうか?
935 名前:デフォルトの名無しさん (ワッチョイ 9f30-i63k) mailto:sage [2023/11/13(月) 01:56:20.78 ID:zqycnYO50.net] 知らんが、onclickするより、 そのhtmlをテキストで読み込んで、 アドレス調べて直接開いた方がはやい
936 名前:デフォルトの名無しさん [2023/11/13(月) 07:48:09.28 ID:qmUd3R410.net] >>926 ウイルスみたいなことは止めてね
937 名前:デフォルトの名無しさん mailto:sage [2023/11/13(月) 09:56:28.31 ID:bmjie8/E0.net] Tiktok LiteでPayPayやAmazonギフトなどに交換可能な4000円分のポイントをプレゼント中! ※既存Tiktokユーザーの方はTiktokアプリからログアウトしてアンインストールすればできる可能性があります。 1.SIMの入ったスマホ・タブレットを用意する 2.以下のTiktok Liteのサイトからアプリをダウンロード(ダウンロードだけでまだ起動しない) https://tiktok.com/t/ZSNfGYxDA/ 3.ダウンロード完了後、もう一度上記アドレスのリンクからアプリへ 4.アプリ内でTiktokで使用してない電話番号かメールアドレスから登禄 5.10日間連続のチェックインで合計で4000円分のポイントゲット ポイントはPayPayやAmazonギフト券に交換できます 家族・友人に紹介したり、通常タスクをこなせば更にポイントを追加でゲットできます
938 名前:デフォルトの名無しさん mailto:sage [2023/11/13(月) 10:34:01.20 ID:M/Z3XSeO0.net] >>929 これは試す価値あるな
939 名前:デフォルトの名無しさん [2023/11/13(月) 11:23:51.91 ID:MRrvj9HMd.net] >>926 イベントハンドラ(onClick)を自動的にクリックとか表現してるあたり、なんか基本がわかってなさそうなふいんきだけど、大丈夫? Edgeに限らず、Shellで開いたアプリをクリックするのは不可能じゃないけどかなり大変 APIを使わないと無理なんだけど、Shell以外の方法で開くのはだめなの?
940 名前:デフォルトの名無しさん mailto:sage [2023/11/13(月) 20:01:33.22 ID:lWzkFiOt0.net] そういうのは、Ruby, Selenium WebDriver で出来そう
941 名前:デフォルトの名無しさん (ワッチョイ 7f07-1GGZ) mailto:sage [2023/11/14(火) 05:23:36.97 ID:OZUGvDNw0.net] アクティブブックを保存してBluetoothでファイル転送。の方法をお教えいただきたくお願いいたします。 上記についてはウェブサイトでも見つかりませんでした。今は手段をメール添付にして似た動作で行っていますが、ローカルPCでも自動ファイル転送するケースがでてきたため、Bluetooth転送方法をお願いいたします。
942 名前:デフォルトの名無しさん mailto:sage [2023/11/14(火) 07:04:54.83 ID:iOHrZmQ00.net] 転送したいファイルを右クリックして 送る で BTデバイスを選択するダケと思いましたケドぬ
943 名前:デフォルトの名無しさん mailto:sage [2023/11/14(火) 13:08:23.76 ID:nlIF0ifC0.net] >>933 BT通信の自動化はかなりめんどい 専門家に開発費を払って作ってもらうレベル 自分でやりたいなら、ここを参考にして https://www.softech.co.jp/mm_170705_tr.htm
944 名前:デフォルトの名無しさん (ワッチョイ ffbd-f7HJ) mailto:sage [2023/11/16(木) 21:59:20.91 ID:NlRecVbU0.net] Microsoft 365 Excel バージョン2310 ビルド 16924.20124だけど、 name no a 1 b 2 c 3 みたいなテーブル1を作ってワークシート上で XLOOKUP("a",テーブル1[name],テーブル1[no],"") ってやると当然1が帰るけど、 vbaで With ThisWorkbook.Sheets(1).ListObjects("テーブル1").DataBodyRange MsgBox Application.WorksheetFunction.XLookup("a", .Range("テーブル1[name]"), .Range("テーブル1[no]"), "") End With みたいにするとaだけ帰ってこない b以降はOK これは何でしょ?
945 名前:デフォルトの名無しさん mailto:sage [2023/11/17(金) 00:30:19.09 ID:82JP36FI0.net] With ThisWorkbook.Sheets(1).ListObjects("テーブル1").DataBodyRange MsgBox Application.WorksheetFunction.XLookup("a", .Range("テーブル1[name]A1:A3"), .Range("テーブル1[no]"), "") End With こんなカンジで試してみてどーかぬ
946 名前:デフォルトの名無しさん [2023/11/17(金) 05:58:28.92 ID:cP0QxO9W0.net] >>936 そのコードで本当に動いた? エラーになるけど。 そのWithの指定だとテーブルの中身だけ持ってくるから .Range("テーブル1[name]") で参照出来ないと思う。
947 名前:デフォルトの名無しさん (スッップ Sd9f-ze79) mailto:sage [2023/11/17(金) 10:29:57.13 ID:n+3yrbg2d.net] >>937 ありがと あとで試してみる >>938 動いてるコードそのまま貼ったつもりなんだけど…動かなかったらすまん
948 名前:デフォルトの名無しさん (ワッチョイ ff02-czGt) mailto:sage [2023/11/17(金) 12:35:58.54 ID:pS9NmqjV0.net] 商社から上司経由でシステムの売り込みとかよく来るしpython勉強すればもっと広い範囲で出来たりするんだろうけど vbaで何とかしようと考えちゃう悪癖が無くならない 42歳だけど化石人種のまま定年になるんかなぁ
949 名前:デフォルトの名無しさん mailto:sage [2023/11/17(金) 17:47:10.30 ID:82JP36FI0.net] 得意なツールでなんとかするのわ ワルくわネエと思いますケドぬ
950 名前:デフォルトの名無しさん mailto:sage [2023/11/17(金) 17:58:29.35 ID:cgnjVGQxd.net] ではN88BASICとフロッピーでなんとかします!
951 名前:934 mailto:sage [2023/11/17(金) 20:54:07.11 ID:Z3gLVdXN0.net] With ThisWorkbook.Sheets(1).ListObjects("テーブル1") MsgBox Application.WorksheetFunction.XLookup("a", .ListColumns("name").Range, .ListColumns("no").Range, "") End With 結局これでうまくいった おまえらありがとう
952 名前:デフォルトの名無しさん mailto:sage [2023/11/17(金) 21:14:43.08 ID:82JP36FI0.net] 解決オメだぬ
953 名前:デフォルトの名無しさん mailto:sage [2023/11/18(土) 09:48:39.54 ID:zOT3yXlF0.net] ChatGPTのcursorとエクセルを連動することって出来ますかね? cursorで作成したVBAコードをVBEに貼り付けて実行ではなく、 cursor内から直で実行したいです。
954 名前:デフォルトの名無しさん mailto:sage [2023/11/18(土) 11:55:47.75 ID:Qfp+vd6T0.net] cursor ってpythonなので python でエクセルを呼んでやれば可能と思いますケドぬ
955 名前:デフォルトの名無しさん (ワッチョイ 5d6e-ekUX) mailto:sage [2023/11/18(土) 15:43:14.57 ID:zOT3yXlF0.net] ありがとうございます。 やっぱり難しいですよね。 そもそもVSCodeとVBAの相性もいまいちなことに気づきました。
956 名前:デフォルトの名無しさん (ワッチョイ a15d-CeNl) mailto:sage [2023/11/18(土) 18:44:14.80 ID:xWw6yRZ60.net] コピー元.Copy : コピー先.Paste はクリップボード経由なので遅いと聞きましたが コピー元.Copy Destination:=コピー先 はクリップボード経由でしょうか?
957 名前:デフォルトの名無しさん (ワッチョイ a15d-CeNl) mailto:sage [2023/11/18(土) 18:45:57.90 ID:xWw6yRZ60.net] ChatGPTの回答を貼ってくれるのでも良いです。
958 名前:デフォルトの名無しさん mailto:sage [2023/11/18(土) 19:32:00.40 ID:Ej/o1uIw0.net] 書いてる間に試せるだろうに
959 名前:デフォルトの名無しさん mailto:sage [2023/11/18(土) 20:51:47.51 ID:xC7uHPaQd.net] 出先とかでVBA動かせない環境かもよ copyメソッド=クリップボードにコピー
960 名前:デフォルトの名無しさん mailto:sage [2023/11/18(土) 23:37:15.79 ID:gYYEvv1+0.net] フォームボタンから引数付きマクロ呼び出すとエラー出たり再度ブック開くときに壊れるね これ改善されないのかな
961 名前:デフォルトの名無しさん mailto:sage [2023/11/19(日) 17:49:55.03 ID:j1WNDpei0.net] 意味わからんな、使い方が悪いんじゃね
962 名前:デフォルトの名無しさん mailto:sage [2023/11/20(月) 18:02:44.99 ID:13EUXszm0.net] それだけだと何とも 壊れるのが普通なら、壊したことないオレが優秀なのか (RPAでXLファイル更新させたら木っ端微塵にされた経験はある)
963 名前:デフォルトの名無しさん (ワッチョイ a154-f5/H) mailto:sage [2023/11/21(火) 14:03:41.40 ID:HpmNczC40.net] された んじゃなくて 木っ端微塵にするロードマップを書いたんだろ 参考までに載せとけ
964 名前:デフォルトの名無しさん (ワッチョイ 6101-lMS9) mailto:sage [2023/11/21(火) 15:47:16.68 ID:6fZ44FAy0.net] >>955 開発元に連絡して不具合であることを確認済み お前のようなアホではない テストですぐわかるからイチイチ書かん
965 名前:デフォルトの名無しさん mailto:sage [2023/11/21(火) 16:47:11.94 ID:YC5sH7GHd.net] MSに問い合わせたってこと?
966 名前:デフォルトの名無しさん (ワッチョイ a12f-f5/H) mailto:sage [2023/11/21(火) 22:17:10.20 ID:HpmNczC40.net] ほほう、「RPA 不具合」でググると散々だな けちょんけちょんに貶されてる まだ時期尚早てか アホでは無いひとはスイスイそれらのトラブルを回避し続けてるということか さすがです クラウドもオンプレもどっちもロクな事書かれてない 実務で導入・運用はこええじゃん 潔いな
967 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 00:08:04.33 ID:x/9NhZOn0.net] まあそこは色々な言い方があるだろうな 全銀がトラブルくらいなら各銀行は信用ならんと言う人もいるだろう 相変わらずリコール出してる車ってものは信用ならんと言う人もいるだろう 30年前は事務のおばちゃんは殆どがPCなんて使ってなかっただろう。今はEXCEL詳しいおばちゃんもいる 30年後にはAIは様々な形で普通に使われているだろう RPAはその一部かもわからないが、実績を上げてる事例は既に多い 現場のおばちゃんが使い出したとこもある システム開発に多額な費用出せない中小企業には救いなソリューションかもしれない
968 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 05:12:35.72 ID:RQffoeNP0.net] RPAでできることはほとんどVBAでできるしね。 RPAを導入するやつはアホとしか言えん。
969 名前:デフォルトの名無しさん (ワッチョイ 6101-lMS9) mailto:sage [2023/11/22(水) 08:00:16.99 ID:x/9NhZOn0.net] >>960 RPA知らないバカですって言ってるようなもん
970 名前:デフォルトの名無しさん (ラクッペペ MM66-lHey) mailto:sage [2023/11/22(水) 10:12:11.97 ID:TR/RnYjJM.net] ロジック部分や外部連携はRPA、セルの修飾などExcel固有の処理をVBAで処理するのが本来の姿
971 名前:デフォルトの名無しさん (スプープ Sd22-6ynB) mailto:sage [2023/11/22(水) 10:33:46.71 ID:bjy9vKhqd.net] いやRPAは自動化システム全体を指すし、 それの実装方法の一つとしてVBAやらPythonやらベンダーのソフトやらがある ノーコードだって一人情シスがシコシコVBA組んだって、 それで作業自動化ができればそれはRPA VBAだとoffice以外の自動化がしにくかったのは昔の話だし
972 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 13:09:03.96 ID:KWP7ULRA0.net] 言い出しっぺが、RPAでXLファイル更新させたら って書いてんだから、VBAじゃあ無いんだろう RPAってなんぞ? と少しく調べてみたら、何のことは無い 自動化を言い換えただけ MS謹製のもあるし日立とかのもあったりする様子だけど、古来そおゆうのが蔓延った試しが無い 云わば吊るしのスーツに体を合わせろの姿勢 個々の企業の千差万別の業務に特化したオーダーメードには やっぱりVBAで対応するのが何より その先の他業務との連携に関してはRPAがございます どうぞよろしく な立ち位置なのか 特にクラウド系の、外部に居てもアクセスできます 部外者へのお披露目関連はこの鯖つこてください とかなら、ネットに疎いみなさんでも容易に使えて都合がいいのかも知れない ただ、自動化の困るところは、いざトラブった時の原因の切り分けが必要以上に厄介に成るところ 一人情シスの手に負えるところじゃ無くなる 要員増やさなきゃ仕事に支障が出る 若しくは外注 中小零細はVBAでいいんだ
973 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 13:30:34.62 ID:1iUy4wDvd.net] >>964 逆 一人情シスじゃないとブラックボックス化してゴミ化する
974 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 15:08:56.43 ID:KWP7ULRA0.net] 一人情シスをボロボロになるまで使い倒す気マンマンでワロタ 本人がやる気満々のうちはいいだろうが、寿命縮むぞ そう長期に亘って携わっていられる業務じゃ無くね? 何よりどんどん投入されるこういった新しい技術も知的財産として蓄えてかなきゃならない それが実務に応用できるかの検証が必要 デバイスもコロコロ変わる 相互の親和性とかもチェックし続け そおゆうのをひとりっきりに任せっぱなしだと、後継者がいざ現場に就いた時に玉手箱明けたウラシマ状態 「なんじゃこりゃあ!」と必ず叫びたくなる 情報共有の重要性を切実に訴えたい そういうトコを切り詰める企業は先細り いや、経営陣はそんなの知ったこっちゃ無い「お金掛けてるのになんでできないの?」「失敗したら責任な」 そんなのが大半だから、ボトムアップで訴えを上げ続けないと って、スレチだな ついな
975 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 15:10:51.10 ID:ZliUGD1s0.net] はい次の方
976 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 16:39:38.78 ID:izBzFnSKd.net] >>966 RPAがオワコン呼ばわりされてるのは、 結局やってることが草の根VBAと同じだからよ RPAそのものより、その運用ノウハウの方が高く売れる 述べてる情報共有方法だったり、業務フローの資料化だったりね
977 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 16:40:36.89 ID:5ubWeHcRd.net] >>966 単に一人情シス イヤになれば 辞めたらイイと思いますぬ
978 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 17:58:45.17 ID:KWP7ULRA0.net] オワコンとは思わんが MSが推進しようとしている、総合型コラボレーションプラットフォーム Teams だの Azure だの それぞれ単品で試してウケが良かったら一つにまとめて行って高値付けて一儲けしよう という方向性がね 尻馬に乗っかろうって他社も同様 万単位で開発者が居るような統合アプリを、一人情シスでは捌ききれん 中小零細がそれをどれだけ導入するかにも依るが いずれは避けて通れなく成ってくんだろうとは思う 「親会社の要請で」だの「導入してないと仕事も貰えない」だの ノウハウ売るだけでサポートなんかしません っつー商売はいいトコに目を付けたと思う 精々お励みください
979 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 18:50:32.60 ID:x/9NhZOn0.net] 仕事楽にするのは別にVBAだけじゃなくても構わんてだけのことよ VBAに拘るのはアホってだけ
980 名前:デフォルトの名無しさん mailto:sage [2023/11/22(水) 19:21:41.90 ID:PUzz2qLsM.net] MicrosoftのRPAというならAzureはちょっと路線が違う PowerPlatformの方が方向性が近い
981 名前:デフォルトの名無しさん (ワッチョイ 59da-hO6y) mailto:sage [2023/11/22(水) 20:02:38.72 ID:MOEEqQ2B0.net] [RPA]PC自動化技術総合スレ[効率化] Part.10 https://mevius.5ch.net/test/read.cgi/tech/1614946651/
982 名前:デフォルトの名無しさん (ワッチョイ 92bd-hO6y) mailto:sage [2023/11/22(水) 21:22:28.41 ID:5G0HUAYG0.net] VBAは属人化しやすいのがネックだね Excel使えるけどVBA使えない人9割とか言われてるし
983 名前:デフォルトの名無しさん (ワッチョイ a1b0-f5/H) mailto:sage [2023/11/22(水) 21:46:54.92 ID:KWP7ULRA0.net] >>973 ありがとう 見てきた ほんの2日前に初めて意識したRPAだが(w ずっとシステムとかに 携わってきた人間なら辛うじて付いて行けるだろうけど、一般の事務職や、まして中小零細の経営陣が これに付いて来れるとは到底思えんな 上場の大企業サマ達がすったもんだし続けていて欲しい そこで熟されたのが末端に徐々に浸透してくならまだしも という感想 末端の実務でも「おおおっ!!」と感嘆符付けるような具体例があるなら加速するのか PowerAutomate なんてのもそんなに普及してるとは知りもしなかったし、ために成るスレだ (導入するかどうかは別として
984 名前:デフォルトの名無しさん (ワッチョイ 6101-lMS9) mailto:sage [2023/11/22(水) 21:50:13.81 ID:x/9NhZOn0.net] >>975 個人でも使ってますよ (対象になるようなことしてない人はもちろん不要)
985 名前:デフォルトの名無しさん (ラクッペペ MM66-lHey) mailto:sage [2023/11/23(木) 03:38:46.12 ID:c3aOXXtmM.net] Office ( Excel / Word / PowerPoint ) PowerPlatform ( PowerAutomate / PowerApps / PowerBI ) https://i.imgur.com/WGgOkUt.png
986 名前:デフォルトの名無しさん mailto:sage [2023/11/23(木) 22:07:03.90 ID:ldI0j2iM0.net] >>974 逆に一割もVBA使えるってこと?
987 名前:デフォルトの名無しさん mailto:sage [2023/11/23(木) 22:53:02.20 ID:1paod0yW0.net] >>978 会社でVBAを使える人はその能力を隠す傾向にある。 VBAの使い手だといろんな仕事を押し付けられる可能性がある。 そしてそれは大概人事の評価にはならない。 会社もそういう人をIT担当にするわけでもなく、 大概IT担当は使えないやつがあてがわれる。
988 名前:デフォルトの名無しさん (スッップ Sd22-tA1D) mailto:sage [2023/11/23(木) 23:21:45.29 ID:qtZOSX2td.net] >>979 イイ話やぬ
989 名前:デフォルトの名無しさん (ワッチョイ a17b-f5/H) mailto:sage [2023/11/24(金) 12:13:32.01 ID:D9lOfF1S0.net] 素性を隠してるのに統計に計上できるって、どんな徳川の隠密が暗躍してンだよ
990 名前:デフォルトの名無しさん (ワッチョイ 82c8-4t+R) mailto:sage [2023/11/24(金) 20:02:24.73 ID:pSI9BelU0.net] そも得られた調査が正確だとゆー保証わ ドコにもネエからぬ
991 名前:デフォルトの名無しさん (ワッチョイ 82c8-4t+R) mailto:sage [2023/11/24(金) 20:15:41.76 ID:pSI9BelU0.net] 誰か次スレヨロだぬ
992 名前:デフォルトの名無しさん (スップ Sd22-oKFl) mailto:sage [2023/11/24(金) 20:42:43.52 ID:hbrpz6MLd.net] Excel VBA 質問スレ Part80(ワッチョイあり) https://mevius.5ch.net/test/read.cgi/tech/1700826110/
993 名前:デフォルトの名無しさん (スッップ Sd22-4t+R) mailto:sage [2023/11/24(金) 20:51:57.44 ID:NqCrzuxcd.net] >>984 ありがとぬ
994 名前:デフォルトの名無しさん (ワッチョイ a17b-f5/H) mailto:sage [2023/11/24(金) 21:08:49.46 ID:D9lOfF1S0.net] じゃあ、九割だなんてでたらめな数字持ち出して悦に入ってる奴が唐変木ってぇことか 数字を扱う業務に携わって居ながら不埒千万だな
995 名前:デフォルトの名無しさん mailto:sage [2023/11/24(金) 21:37:35.25 ID:NqCrzuxcd.net] そも統計データの擬装わ ジャップの十八番やからぬ
996 名前:デフォルトの名無しさん (ワッチョイ 67da-temB) mailto:sage [2023/11/25(土) 13:57:58.26 ID:vXTDCkck0.net] AI機能「Copilot」を組み込んだデスクトップ版「Power Automate」の2023年11月更新 https://forest.watch.impress.co.jp/docs/news/1549608.html
997 名前:デフォルトの名無しさん mailto:sage [2023/11/26(日) 17:22:27.82 ID:y37wT4Od0.net] マクロ組めるのに、そのスキルをアピールしない。能ある鷹は爪を隠すだね
998 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 11:04:12.33 ID:CI3qhd280.net] まるで、ペーパードライバー 能力を持っていながら才能を発揮して無きゃ いざ!の時に錆び付いてて使い物に成らない 過去の遺物を触れるってだけ そんなのを能ある鷹とは呼べず、No!だけのタコと呼んでもいい
999 名前:デフォルトの名無しさん [2023/11/27(月) 12:15:29.53 ID:JK0eRP930.net] タコに脳は9つあるよ
1000 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 12:36:04.31 ID:4J6Hopki0.net] そのうち8個はたった1ミリしかないけどな
1001 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 13:47:40.34 ID:CI3qhd280.net] えー、鷹に対応する何か他のもの探したけど出て来なかったからタコにしただけなのにー
1002 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 13:54:20.52 ID:yjJan1RNd.net] 鳶とかすぐ出てこないか?
1003 名前:デフォルトの名無しさん [2023/11/27(月) 16:43:18.10 ID:YdGgb4vX0.net] ゆとり教育で漢字書くのはそれほど重視されなくなった オレはとっくに重視してなくて、書けない漢字山ほどあるわw
1004 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 18:17:40.90 ID:r8TeIdPlD.net] >>990 チンコみたいだね
1005 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 19:28:46.59 ID:qhnBXcl0d.net] >>995 漢字の話ですらないことも読み取れない脳足りんのお前 それが何を重視するとかすこぶるどうでもよい
1006 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 20:32:41.92 ID:CI3qhd280.net] 能ある鷹 vs No! だけの鳶 ソッチのが変だろ そんな説明しなきゃいけない時代か やれやれ
1007 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 20:50:08.95 ID:qaoAg4Y0d.net] >>998 タコは変じゃないのか?
1008 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 21:11:46.40 ID:4J6Hopki0.net] これは「たか」と「たこ」の高度なダジャレなんですよ
1009 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 21:29:40.40 ID:CI3qhd280.net] ダジャレかな ダジャレじゃ無いよラップだよ のーあるたか!のーだけのたこ! のーあるたか!のーだけのたこ! のーあるたか!のーだけのたこ! 三回唱えりゃよっくわっかる 頭韻踏んでるラップだよ! なんつて どーもすみませんでした
1010 名前:デフォルトの名無しさん mailto:sage [2023/11/27(月) 22:03:47.07 ID:4J6Hopki0.net] ラップってつまるところおやじギャグの繰り返しじゃん
1011 名前:1001 [Over 1000 Thread.net] このスレッドは1000を超えました。 新しいスレッドを立ててください。 life time: 303日 9時間 51分 35秒
1012 名前:過去ログ ★ [[過去ログ]] ■ このスレッドは過去ログ倉庫に格納されています