Excel VBA 質問スレ Part54 ->画像>6枚

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


最近プロによる書き込みが多々見うけられますが
彼らに絡むと話がこじれるので質問したい方は適当にスルーしてください


※前スレ
Excel VBA 質問スレ Part53
http://2chb.net/r/tech/1524823358/

>>1
乙

データ数が違う2組のデータがあったとして、
それを1つのグラフに表示させたいのですが、
x軸が合わなくて困っています
調べても解決できませんでした
よろしくお願いします
https://ideone.com/9Dphe3

>>3
すみません
もしかしたら自己解決しそうかもです
1番目のグラフの種類をxlXYScatter
に変えたらx軸が合いました
でも、どちらもxlLinesの場合や
2番目のデータだけxlXYScatterの場合は
x軸が合いません
なぜなのでしょうか？

>>4
すみません
やっぱり嘘です
xlLineに変えても

>>4
すみません
やっぱり嘘です
xlLineに変えてもx軸は合いませんでした
なぜなのでしょうか？

>>6
深呼吸

初っ端からワロタ

すみません、落ち着いてまたやってみたら自己解決しました
いろいろ変えてみたのですが、多分
xlLine→xlXYScatterLinesNoMarkers
に変更したのが一番効いたのだと思います
xlLineだと.AxesのMinimumScaleや
MaximumScaleが正しく動かなかったのですが、
xlXYScatterLinesNoMarkersに変えたら
それも正しく動くようになりました

よくよく考えてみればxlLineは月ごとの変化を見るときに
よく使ったりするやつですよね
今回のデータは散布図系のやつを使うのが適切でした・・・
https://ideone.com/WrXahz

>>9
まさか散布図はX,Yがあるけど、それ以外のグラフはYしかないっていうエクセル仕様が分かってないなんてオチかなぁ
と思って確認しようとしてたら先に自己解決してたか、まあ良かった

今回の例では、散布図以外のグラフでは、Xだと思っているのは数値ではなく、単なるY要素ごとのラベルでしかない
この場合、横軸はXデータの数値によらず等間隔に並んでしまっているはず
XY型のデータには散布図以外使えないと思った方が良い
Xが等間隔に並ぶ場合のみ、なんちゃってで使えるけども

まあ、散布図っていう名称のせいで、自分の用途には使えないと勘違いするグラフ初心者は多い

エクセルで散布図って呼ばれているものが本来のグラフで、それ以外のはただのポンチ絵（）だと思うんだけど、
ずっと散布図って名前なので憤りを隠せない

ｼｬﾁｮｰｻﾝｽｹﾍﾞﾈ

>>10
ありがとうございます
まさにおっしゃる通りでその仕様知りませんでした
横軸が等間隔に並んでいてなんでかな〜と疑問に思ってたのですが、
なぜそうなってしまうのかその説明でやっと理解できました

ほんまに深呼吸したら解決しとる。可愛いなぁw

元号どうなるん？

西暦に変わるよ


いや、性歴に変わるよ(´Д｀)

既存の全文字コード＆フォントのアップデートで商売になるな

excelVBAスタンダードの資格って社会的に評価されるもんなの？
試しに見てみたら思いのほか簡単に出来そうだったから受けてみようかと思ってる
「エクセルが使える」って言葉の１つの裏付けになるかなって

オフィス系の資格は就職後に評価されることは無い
無職か派遣なら無いよりはマシ
会社としては雇うか迷う時に資格や経験を参考にする

しかし履歴書の資格とか経験は嘘ばっかりで役に立たない奴がマジ多いので
あんまり信用してないが、中には本当の奴もいるので
そういうのは面接とかでアピールする方が上手くいったり

そもそもVBAなんて資格なんてなくても使える奴は普通に多い

言っとくがエクセルは相当使えん奴でも強制的に一日中使わされるから
優秀な奴ならVBAは自然と使えるようになるのを会社も分かってる
もし学生なら別のスキルを磨け
多分英語系なら引っ張りだこ

社会では>>20のようなアドバイスしたがりのバカが一番使えません

なにかを犠牲にする訳じゃないんだからやってみるのが一番

世間一般のエクセル使えますの評価ってだいぶ低いと思うけど
ぶいびーえー？ってのがほとんどだよ

Excelは社会人の基本ですからね。
名前が書けるのと同じ、当然のことなんですよ。
逆に、Excelに馴染みがないのは、名前が書けないのと同じです。

>>21
いちいち相手するなよ ...

>>18
持ってるけど評価されてるのか微妙
まぁ持ってて損はしてないと思う

持てるだけの能力を身につけることが大切なのでは
それが身についていれば自信を持って使えると言えそう

まあ IT Passport や FE のレベルだと持ってたからといって効力はほとんどない。
知識自体はもちろん有用。

VBAを自在に操れる人って凄いと思うんだけれど
Cやパイソンやジャバや色々やってる人から言わせると
VBAは、なぁ（笑）ってなるのは何で？

VBAだって小規模の開発はできるんだし
立派な言語だって思うんだけれど

>>29
なんでCをカタカナで言わんの？
(´・ω・｀)b

>>29
多分VBAを自在に操れる人は他の言語も使えるからなw
それを踏まえて(笑)なんじゃないか？

>>29
ママチャリを小馬鹿にするロードレーサーのような気持ちかな

30年以上前に、初心者はBASIC、ベテランはCという流れがあって、いまだにそのイメージを引きずってる老害の可能性
今ならVB.Netで問題なく開発できてパフォーマンスも大差ないのに下に見てるのは間違いなく老害

どうみても老害に憧れを抱くゆとりの仕業やろw

>>33
VBAとVB.netは全くの別物なんだけどね

老害の特徴

・マルチプロセス/スレッドを嫌う
・string 型を嫌う
・スクリプトを嫌う

>>33
ちょっとBasicに夢見すぎだと思う
Microsoftですらもう興味ほぼゼロのVB.NET
VB.NETから見ても超絶時代遅れVB6
VB6から見てもオモチャのようなVBA

>>35
すまん
はしょりすぎて伝わってない可能性

VBAはExcelのオマケだし実行速度は遅いし扱えるメモリも小さいしライブラリも貧弱なのは確かだから、
下に見られてもしょうがないけど、用途を限定すれば実用十分な性能を持っている
だから、無条件にVBAを見下してるのは老害の「可能性」がある

逆にVB.netはC#と同等の内部処理を行っているので、これを見下しているのは間違いなく老害と「断定」できる

//でショートカットキー表示されるの今日知った

同じランタイムで動く、ILで同等だから言語的にも同じステージにいるんだというのは乱暴すぎるな
最近のC#のモダン化には構文レベルでの利便性向上が数多く含まれる
野暮ったい文法のVB.NETがこれに追いつくのは難しい
というか最近はC#に対してVB.NETは機能面でも実装が追いついてない
もはや構文以外は同等とすら言いづらくなってきている
この辺りはMicrosoftとコミュミティのやる気のなさが露骨だね

言語そのものよりもそれを使う連中が嫌われてる
成立上VB6から移行してくる人が多いから、OOPな書き方ができないstaticおじさんみたいのが多いんだよ

Visual Studioの中だけで言えば、構文解析エンジンを何種類も保守する意味がだいぶ薄れてきた
そろそろ1本に絞ってもいい頃だろうとは思うがBASICやFORTRAN勢はやっぱり抵抗するのかな

今からVBAを覚える必要は全くない
違う言語をやった方が1億倍幸せになれる
こーいうとエクセルしか使えない環境の人ガーーーっていう奴がいるけど
そんなキャリアアップが出来ないようなクソ会社で時間を浪費するのはエンジニアとして失格
プログラマーとして合理的な思考をしよーな
今時エクセルなんてメモ帳程度だよ
普通はもっと便利な専用アプリ使ってるから今のクソ会社に騙されないでね

エンジニア前提なの？

Excelは忖度エンジンなので、あれを超えるものは現れないのでは？

>>43
> 普通はもっと便利な専用アプリ使ってる
具体例出せない時点で無職の妄想やね

どうせ会社では使えないし使わせてくれないし → まちがい
自宅で好きな環境作ってたくさん覚えて転職 → せいかい

桁揃えとか連番とかにExcel使ってますよ私は。
B1に「=A1&REPT(" ", 10-LEN(A1))」を入れて、ピューっとドラッグするわけですよ。
B30までドラッグすると、A1の部分がA1〜A30まで勝手に変化して埋まりますからね。
これは並みの忖度じゃないですよ。

プログラマこそExcel使うべきですよ。
そんなちまちまIDEの拡張書いてるよりずっと早いですから。

VBAなんて無価値なので転職で有利にやるわけ無い

いやいや、これ使えるのと使えないのではずいぶん差が付きますよ。
たとえば、見積もりシートなんてどこにでもあると思いますが、結局、利益は見積もりで決まるわけじゃないですか。
見積もりシートをいじれるのといじれないのでは、幹部と下っ端の違いが生まれるわけですよこれ。
いじれる人が考えたパラメーターでいじれない人は入力するだけなわけですから、いじれなかったら結局事務の女とやることが変わらないわけですよね。
絶対覚えた方がいいですよ。

もうね、Excel使えなかったら社会人として終わってますから。
社会人の基本ですからねこれ。

Excelの使いこなしだけでも、年収200万くらいは変わるんじゃないですか？

見積もりとか今時Webアプリで共有出来るようにしてるだろ
なんでエクセルでやるの？

>>54
ウェブアプリで共有してたら他社と横並びだからに決まってるじゃないですか。
そんな当たり前のこと聞いてからかってるんですか？

利益は見積もりで決まる。
見積もりシートは門外不出。
あたりまえですよね？

電話は3秒以内にとる。
見積もり依頼は一時間以内に返事する。
簡単なルールですから必ず守ってください。

社内共有に決まっとるだろ

社内共有ならExcelでいいじゃないですか。
そもそも、外に出せないノウハウを自分で書けるのがExcelの良いところなんですよ。
なぜ経営者がExcelっ子を優遇するのか。
それはノウハウの漏洩を恐れるからなんです。

Excel使えない時点で人間として駄目ですからねこれ。
結婚するときはExcel使えるかどうか、本当に使いこなせているかどうか、ちゃんと確かめた方が良いですよ。

エクセルファイルって同時接続出来るの？
社外からもエクセルファイルにアクセスして確認とか出来るの？
外にいる人にも同時に見れるの？
もしかして今のエクセルはそーなのかね

>ID:lUyHhYKP
平日昼間に連投
終わってるのはあなた

>>50
職種によるとしか言えない

時々、無闇矢鱈にExcelを憎悪する（笑9人間が出没するな ww
何かあったんか？とききたくなるわw

>>61
今のオフィスはそうなんですよ。

というかWindows自体、異なるデバイス間でドキュメント共有しますからね。
いずれWindowsは無料になるんじゃないかと思います。

オフィスの再インストールもプロダクションキーがいらなくなってたり、最近は結構変わってきてます。

ニートエクセラーさん暇そうで羨ましい

>>68
時間というものは他人が作ってくれるものじゃないんですよね。
自分で作らないといけない。
そこでExcelなんですよ。

他人に神エクセルとスパゲティVBAを強要して相対的に時間的優位に立つ

Redmineを使いだしてからエクセルの価値が減った
ブラウザで情報共有するのが基本形になるとダウンロードしてファイルを開くまで時間がかかるエクセルは自然とNGになる

>>71
エクセルなんて時代遅れだよな
Webブラウザで共有が一番
端末も選ばないし

>>72
時代遅れではないかな
ただ適材適所ということ
エクセルにはエクセルの得意なシーンがある
小規模な表形式のデータ編集をするならエクセルが最適だと思う
逆にスクリプティング、ドキュメンテーション、情報共有にエクセルを使うのは無理がある

>>71
いやいやいやいや、ダウンロードとかいつの時代の話してるんですか。

>>72
Excelも端末選びませんが？

>>71
Redmime?
Excel の使い方間違えてるだけじゃね？

>>76
そのとおり
使い方を間違えてる人が多すぎる
正しくツールを選定して本当にエクセルでやるべきことをエクセルでやるようにするとエクセルの出番がどんどん減っていく

そもそもニートにエクセルいらんからなw

ホントにExcelが無くなってシステムから必要な資料が一発で出てきてくれたら助かるけど、そんなの聞いたことない。
あるなら教えてほしい。

>>79
オープンソースの全文検索エンジン使っちゃいなヨ

XP時代の人みたいだな。
Excelが起動したいならコルタナさんにエクセルと言えばいいだけだし、何かを探したいならコルタナさんに言えばいいだけだろ。
オープンソースの検索エンジンとか、セットアップしてるだけで時間の無駄。

コルタナって全社の膨大なドキュメントから一瞬でほしいもん見つけてくれんの？

>>82
もしかして、エクスプローラも使ったことないんじゃないのか。
共有ってボタンあるだろ。
何のためにあると思ってんの。

あと呼び捨てやめてくれる？
コルタナさんはちゃんとさん付けで呼んでよね。

>>83
フォルダ共有のエクセル開くのとんでもなく遅いんだけど？
あんな遅いの我慢してたらストレスで禿げるよ

XP時代で止まってるんだろ。
まあいいから使ってみ。

win10だけどガッカリ性能だったわ
当たり前だけどただのデスクトップOSが全文検索サービスに勝てるわけなかったんだよね

>>87
いやいやいやいや、使ってたらフォルダ共有とか言い出さないだろ。

使ってるんだったら、コルタナさんにナタルコって言ってみ？

何も知らない私が、3年間java頑張ったら
このスレで、あなた方と会話できるようになれますか？

ＶＢＡでの記述について質問です

関数が入っているセルがあり、計算されると関数を抜いてに値のみにしたいのです。
処理の数が多く、値のみ貼り付けでは追い付かない状況です。

ＶＢＡ初心者で調べてもわからず困っています。
コードをご教授ください。

>>91
セルの左上の▽のクリック（要は全シート選択）して
右クリックでコピー

新しいシートを開いて、
右クリックして、
貼り付けのオプションで
値のみを貼り付け（１２３のアイコンね）

じゃあかんの？
ちな２０１３

ひとまずマクロ記録してみようや

>>91
コードを求める前に、手動の場合（VBA使わない場合）はどう操作する作業なのかもう少し具体的に書こうや
>>92と同じことをブック内の全シートに対して適用したいの？

range.Value = range.Value

>>91
なんでそんなことするの？
また神エクセル？

結果だけを人に渡したい需要は世界中に存在する
勝手にいじられると困るとか計算式を知られたくないとか

Ctrl+A
↓
Ctrl+A
↓
Ctrl+C
↓
右クリック
↓
形式を選択して貼り付け
↓
値

まあPDF化すればいいんですけどね

foreach、cells.copy、special pasteで適当にすれば？

・・・まあいいか

エクセルってめんどくせえなあ

エクセルサーガ

>>91
入力データは、、手入力するわけだよね

>>102
だから、君は無理してExcel使わなくてよろしいがな。嫌いなんだろ？

Excelもマクロも嫌いだけど仕事だから仕方なく使ってる
親のコネでやっと入ったバイトだからやめるわけにもいかない
5chに愚痴を書き続けるしかない人生

エクセル嫌いって意訳するとバカだよ？

>>105
集団で働く以上は嫌でも周りの風習・伝統に合わせないとネ
チームや客がエクセルを使ってたらエクセルを使わざるをえないだろう
マネージャさんや手動テスト要員のアルバイタなど関係者がみんなITのプロとは限らないのでこれは仕方がない
もちろん個人端末にはエクセルをインストールすらしてない(というかそもそもLinux)
オープンソースやプライベートのプロジェクトでエクセルを使う理由は全くないからネ

オープンソースやプライベートのプロジェクトがないやんwバカw

>>108
Excelをバッスィーンと窓から放り投げ、貴様らのような雑魚と一緒に仕事はできん！、颯爽とLinuxの国へ向かうというのはどうか。

表やリストから抽出したデータを加工してソースの一部にするのは良くありがちなので、プログラマこそExcel使いこなすべきだと思うけどなあ。
その表がExcelならもちろん、HTMLのテーブルであっても容易に取り込めるのがExcelの良いところなわけで。

昔よくExcelは雑魚の道具、真のプログラマはSedとAwkを使う！とか言ってる人いたけどさ。
そんなものこねくり回してる暇あったら、Excel使ってマウスでちょちょいとやれば済むことなんだよね。
やったことの過程がシートに残る、結果ももちろん残る、すべて残る、そして渡せる。
これはとても素晴らしいことなのです。

>>111
テーブルデータはcsvか次点でjsonあたりでいいよ
ベンダロック強いエクセルはプログラマには合わない

>>112
ソースデータとコマンドがテキストで全部残ってバージョンコントロールできる方が良いだろ

つか渡せるのはエクセル関係なくね？
エクセル以外は転送禁止的な規約があるのかな

そりゃExcelを使ったことのない人の感想だわ。
使ってて使いづらいというのはわかるんだけど、使ったことないけど使いづらいって人が多くて困るわ。

俺はソースツリーに.oneと.xlsxを含めてる。

日常的な繰り返し作業ならシェル開いてコマンド打った方が楽なんだよな
たとえばだけど表形式のデータからgetterをコード生成したいなぁって思ったら
import-csv -path "props.csv" | % {
"public $($_.Type) get$($_.Name)() { return $($_.Name); }" }
って1行打つだけじゃん？
エクセルだとキーボードとマウスでガチャガチャやらんといかんしデータもcsvからシートにインポートしなきゃならん
めんどくさすぎ

csv作るまでの過程で、Excel組は帰ってるんじゃ？

>>117
psのcsv読み込みは#混ざってるとデータ消えるって本スレでやってるじゃん
1行どころか使い物にならない

>>119
確かにそれは意味不明な仕様だけど実用上困る事はないよ
import-csvは#あっても消えないし
catからConvertFrom-Csvに繋げたいならrawオプションをつければいい
任意のコマンド結果をConvertFrom-Csvに繋げたいならOut-Stringを挟めばいい
エクセルで作業する忍耐力があるならカンタンだな

なにかいい入門書を教えてください
入門者のexcel vbaという本は、簡単でしたので、次のステージに行きたいです

VBAなんか本いらん。ネット情報だけで充分過ぎる
とにかく色々かけ。そして作れ

>>122
レスありがとうございます
満員電車電車移動中に勉強したいので、本がいいのですよね

オープンソースソフトのコードでも読めばいい

>>119
このスレで他ツールのCSVの取り扱いにケチつけるとかギャグか何か？
世界で一番CSVぶっ壊してるの間違いなくExcelだぞ

countaで最大値を取って-1した行を取れば良いんじゃないか？

>>127さんお返事ありがとうございます。
ただ、それだと5行目がない場合に3行目が返されてしまいますよね。今日の値があるなしに関わらず昨日以前の値がほしいのです。

>>128
行数を取得したいのか、それとも値（シリアル値）を取得したいのか。
日付データは当然、昇順ですよね？

グラフの判例項目を足したり削除したりしたいのだがムズイ
マクロの記録で録ったのを流用してもうまくいかない時があって難儀してるわ

>>126
これは普通にmatchでいけるよね。
バイナリサーチモードで。

>>129
何行目にあるのかを知りたいのです。
昇順です。

>>132
r = Cells(Rows.Count, 1).End(xlUp).Row
If Cells(r, 1) = DateValue(Date) Then r = r - 1

>>133
ニホンゴムズカシイネ^^
VBAよりまず読解力

もうすぐ廃止されるかもしれんVBAを本気で覚えようとするモチベが湧かないわ

元々本気でやるようなもんじゃないし

本当ならめでたいことだが
VBA廃止ってどこ情報だよ

C#になるんだろ？

Pythonがどーたらって噂のことだろ？

python使いたいならLibreOffice使えば？

>>140
お前が顧客提案資料作れや

>>132

dim i as integer
i=1
do
i=i+1
loop while cells(i,1) < date
msgbox i-1

エラー処理とからは無しだけど。

最終的にPDFにして送るんだからExcelにこだわる意味って…

年賀状やチラシ作りに便利だから。

昔の職人さんが包丁一本で生きていけたように、今はExcel一本あれば世界中どこでも生きていけるからな。

>>145
1行目に入ってる項目名がスワヒリ語だったとしても？

オブジェクト指向追加すればそれでいいよ

フォルダ内にあるファイルがそれぞれどんな中身なのか、一つづつプレビューか開くかしないと判らず死にそう

1つずつ開いてスクリーンショット取らせるようにマクロ組んでみたけど、タイミング、ウインドウ表示の問題で上手く回収出来ないみたい

何でもかんでも1つのブックに詰め込むからそれが何のためのブックなのか曖昧になる
そうなると適切なブック名を付けられなくなって中身が分からなくなるしエクスプローラーで見たときの検索性も低くなる

そしてエクセル使いはファイル数が少ない方が良いと言ってシートを増やしまくる傾向がある
チームでエクセルを使うならこのストレスには耐えるしかない
民主主義では数が多い方が正義だからね

エクセルは、データとスクリプトを分離しろ。

今でもデータを別ファイルでもDBにしてもアクセス出来るじゃん

出来る。のと、そうなっている。の違いは大きいよな。

だからそうすればいいじゃんって事

馬鹿が使えは何でも無茶苦茶になる

どこで聞いたら良いのかわからないのでここで…
4Kモニタ買ってDPIいじったらExcelのオートシェイプが歪んで印刷されるようになりました
この歪み具合というか補正係数みたいなのを導き出す方法ってありますか？

縦にズラーっと1000以上データが入ってて
5回以上同じ値が連続するセルを色づけするvbaを作って貰えませんか？
入力ごとに自動実行してくれるとなおありがたいです

>>156
死ねよ

>>156
失せな

〜〜が出来ずに困っています、何かヒントをいただけたら有り難いのですが

と言ったら別に頭にこないだろ。作ってもらえませんかと言われただけで死ねとか失せろと言うのは、
表現だけに拘った愚かな対応だな。

すいません端折りすぎました
ほとんど自力で作成はできてるのですが、
判定させるほぼ全てのセルに計算式が入っていて、見かけ上は空白セルでも計算式の入ってる所は全て同じ値判定になって困っているのと
自動実行のやり方が分からないといった感じです

>>160
ランサーズとかに発注したら

質問の仕方を間違えたみたいで申し訳ありません
自分のレスは忘れてください
スレ汚し済みませんでした

>>156
http://www9.plala.or.jp/siouxsie/excel/date06.html

>>163
これはネタなのか？文字化けなのか？

すげぇ　片手に余るレスでお客さん追い返してやんの
桜井佐那（戸田恵梨香）が来る前の崖っぷちホテルか
>>158 がくっきー(野生爆弾)の顔で睨んだとイメージ

>>156
作りかけのファイルアップしてくれたら何とかできるかも。

イベントの条件など、その人にしか分からないことが多いから自分でコード書くのが一番いいんだけど。例えばA列限定なのか、A列からJ列なのか、全ての列なのかでコードは変わってくるでしょう？
データも、縦方向に連続しているのか空白があるのか、空白が5行続いた場合どうするのか、空白と0を区別するのか、などなど。

あと、ここよりエクセル総合質問スレの方が親切な気がする。

つーかそんだけ条件はっきりしてんならちょっと考えたらわかるやろ。しかもほとんど自力でって言ってんだし

>>160
見かけ上は空白セルということは実際の値は何でしょうか、例えば文字列""であるとか。
自動実行は>>163のURLが分かりやすいですが、もし文字化けしているのならばWorkSheet changeで調べると良いかと思います。

>>164の意味がわからない
うちでは>>163のリンク先は普通に見えてるけど、文字化けして読めない環境の人もいるってこと？

質問
再利用性高いプログラム書いたとしてそれをどこに保存してどう活用するの。
例えば〇〇出来るマクロ作れ！言われてファイル開く部分は前作ったsubプロシージャで良いなと思っても今は前のソースからコピペしてる
クソなことしてる自覚はあるけどどうすればクソ脱却するか分からん

>>169
MIMEの文字コード種別の記述と実際の文字コードが違うとかあると、ブラウザによっては文字化けするよ。

>>169
lPhoneのJanestyle アプリで開いたから文字化けしてた
流れ的に高度なネタなのか判断が出来なかったので

>160
計算式が入っているってどういうことだろう

>>170
Runで呼び出すのはどうでしょう

>>169
原因は>>171なんだろうけど大抵のブラウザはMIME無視して文字コードを指定して表示する方法がある
そんなことも知らないで>>164みたいなレスする奴のレベルは知れてるから相手しなくていいよ

>>170
C#かVB.NETでCOM dllを作ってシステムに登録
ブックから参照の追加で↑を再利用
かな
addinでもいいんだろうけど使いにくかったので俺はaddinの利用をやめた

>>176
addinてなんだっけ？
自分はexamの運用で特に不自由感じてないけど、使い方によってデメリットあるのかな

クッソ、さっきから頭の中で小さな男女が楽しそうにマイムマイム踊ってやがる。

俺なんて引き出し開けたら大名行列がいたぞ

トイレの中に魔法使いがいる

机からメス猫形ロボットが出てきた

シートをコピーして名前を付けるときにすでにそのシート名が存在し、重複した場合、メッセージとして、"既にその名前のシートは存在しているのでコピーしません。"
とメッセージボックスに表示し、シートをコピーしないようにしたいのですがどのようにすればよいのでしょうか。
現状は、重複する場合、コピーの元となったシートに(2)などデフォルトで付いてしまってこまっています。
どなたか教えていただけると幸いです。

>>182
事前に名前を取得すればいいだろ
馬鹿なの？

>>182
Private Sub hoge()
Dim title As String
Dim pro As String
Dim default As String
Dim rtn As String

On Error GoTo Errhd

ThisWorkbook.Worksheets(1).Copy after:=ThisWorkbook.Worksheets(1)
title = "シート名の入力"
pro = "追加したシート名の名前を入力して下さい"
pro = pro & vbCrLf & "キャンセルすると規定のシート名です"
default = "ここに入力してね"
rtn = InputBox(pro, title, default)
If Len(Trim(rtn)) <> 0 Then
ActiveSheet.Name = rtn 'ActiveSheetは使いたくないなー
End If
Exit Sub

Errhd:
If Err.Number = 1004 Then
MsgBox "シート名が重複してます。規定のシート名にします"
Else
MsgBox "エラー：" & Err.Description & "エラーNo：[" & CStr(Err.Number) & "]"
End If
End Sub

>>184
VBAの前に日本語を勉強しようか

>>185
流石プロ
いう事が違う

>>185
そだねー

>>184
文法がすげぇ

プロさんはソースコードレビューでコメントの日本語の指摘ばかりうけるので
ここで日本語の指摘して憂さ晴らししとるんやで
察してさしあげろ

カーネルナンチャラのいみがわからん

>>189
いやそもそも>>182の要件を一切満たしてないし

読解力はどこへ行ったのか

>>182
勝手に(2)になるってことは、シートのコピー自体をマクロでやってるってことかな？
1枚だけならともかく、複数シートのコピーとか考慮するとかなり難しいと思う。
1枚でも同じ名前があればコピー中止するのか、(2)になるのだけを中止するのか。
現在のコード見てみないとなんとも言えないを

foreachでシート名取得すればどうとでも出来ねーか？

ForEachでWorksheetsコレクション回してコピー元のシート名と一致するか見れば済む話だろ
答える側のレベルも低すぎ

For Each 回したりするくらいならこうだろ

Dim wks as Worksheet
On Error Resume Next
Set wks = Worksheets(sheetname)
On Error GoTo 0
If Not wks Is Nothing Then …(重複時の処理)…

182です。
みなさんありがとうございます。
今の状況はこんなコードです。

Dim i As Long
i = Worksheets("マスタ").Range("B3").Value

Worksheets("鑑").Copy After:=Worksheets(Worksheets.Count)

Worksheets(Worksheets.Count).Name = i

というコードです。

こんな表を書きたいのですが、どのようにコードを書けばいいのでしょうか？

>>196

これならcopyの前に、その名前のシートがあるか判定してアラート出せばいいでしょ。

Sub test()

Dim myShName As String
Dim myWS As Worksheet
Dim myFlag As Boolean

myShName = Worksheets("マスタ").Range("B3").Value

For Each myWS In Worksheets
If myWS.Name = myShName Then
myFlag = True
End If

Next myWS

If myFlag = True Then
MsgBox "すでにあるためコピーしません", vbInformation
Else
Worksheets("鑑").Copy after:=Worksheets(Worksheets.Count)
Worksheets(Worksheets.Count).Name = myShName
End If


End Sub

ごめんなさい。197はスレを間違えました。失礼しました。

>197

ふつうにマクロの記録でできると思います。
が、それをマクロでやる意味があるのかどうかは分かりません。
手作業でなくマクロを使いたいのはなぜ？

ID:l2af3llu
馬鹿過ぎ

excelはめんどくせえなぁ

>>202
優しくしてねハート

>>196
flgを立てないパターン。
Dim sheet_name As String
Dim ws As Worksheet
sheet_name = Worksheets("Sheet1").Range("B3").Value
For Each ws In Worksheets
If ws.Name = sheet_name Then
MsgBox "alert", vbInformation
Exit For
Else
If ws.Name = Worksheets(Worksheets.count).Name Then
Worksheets("Sheet1").Copy After:=Worksheets(Worksheets.count)
Worksheets(Worksheets.count).Name = sheet_name
End If
End If
Next

ファイルの上書き保存を禁止するマクロって組めるの？
それともファイルを開いたら自動的に複製が作られるようなのを組んだ方が楽かな
チームで1つのファイルを使ってて加筆することはあっても消す事は出来ないようにしたい

>>205
before save イベントで、ある程度はできそうだけど、「上書き保存できないように」「加筆することはあっても消すことはできない」あたりが、ちょっと何をしたいのかよく分からないですね。

>>205
svn導入したら？

悪いこと言わないからWebアプリを覚えた方が良いって
共有も簡単
同時入力も出来る
端末も場所も選ばない
覚えるのはSQL C# html css JavaScript
たったこんだけで飛躍的に変わるんだから

>>205
操作ミスを防ぎたいだけなら「読み取り専用を推奨する」を設定しておくのじゃダメかな
http://www.moug.net/tech/exopr/0060021.html

>>205
エクセル上の上書き保存を禁止するだけなら、プロパティで読み取り専用にする方法と、Open時にパスとRead Onlyフラグを見て判定する方法と、before saved時にcancelする方法が考えられる。application.UserNameと組み合わせて自分以外は保存出来ないようにするとかね。

びふぉーせーぶきゃんせるしたらマクロほぞんできなくねて思って調べたらマクロ実行中にcancel　trueにするとか書いてて目から鱗
使わんけど

>>205
>>207の言う通りファイルを複数人で共有して管理するなら
SVNとかTFSとかGITとかの導入を考えた方がいいかも
それなら間違って書いて上書きしてしまっても誰がいつ書き換えたかも分かるしすぐに直せる
もちろん何かしらでファイルが消されてしまってもすぐに復活出来る。

個人や会社の研修に使う程度の小規模のものなら
これをONE DRIVE、GOOGLE DRIVE、DROP BOX等と併用して使えば
インターネットに繋がる端末であればどこからでも
参照することが出来るようになる。
ただしセキュリティ面に関しては自己責任で。

と、無職が書いてます

ビジネスマンは認証なしファイルサーバーでエクセル共有が常識
徹底的に無駄をそぎ落とせ

>>214
共有ってもエクセルって同時に開けないでしょ？

>>215
エクセルを共有し、複数人で同時に書き込むの面白いよ

会議とかでエクセルで議事録を書き、それを共有する
（同時にプロジェクターで映し出すのもいい）
それを各自が見ながら発言し、適宜各自が修正などを加えていく…
４〜５人のお馴染みのメンバーによる会議なら、議事録作成はこれが一番手間いらずだったな

共有ってのは情報を共有するってこと
ファイルがみんなの目に触れられるところにあればそれは共有してると言える
同時に開けるか否かは関係ない
社長のスケジュールを社員全員が共有する、みたいな

入力しにくい、同時作業しにくい、検索しにくい
エクセルは情報共有ツールじゃないということだ
実は表計算ツールなんだよね

ExcelはDTPソフトにもデータベースソフトにも統合開発環境にもなる

何か一つしかアプリをインストールできないとなれば間違いなくExcelを選ぶ

何かひとつならdotnetインストールするわ

単にエクセルしか使えないだけ

単に向上心がないだけ

>>215
一応あるぞ
https://support.office.com/ja-jp/article/%E5%85%B1%E6%9C%89%E3%83%96%E3%83%83%E3%82%AF%E6%A9%9F%E8%83%BD%E3%81%AB%E3%81%A4%E3%81%84%E3%81%A6-49b833c0-873b-48d8-8bf2-c1c59a628534

共有はオブジェクトが扱えないのがなぁ

じゃあなんでexcelがこんなに普及してんの？
ここであれこれ名前が上がるけど、マイオナにしか聞こえん

普及してるのは最初から入ってるから
でも今では会社じゃほとんど使わないですよ
使ってもメモ替わり程度
それ以上の用途はそれぞれの専用アプリを使います
なければWebアプリを中心に作ります
エクセルメインって弱小零細企業なんだろうけどテクノロジーは恐ろしいスピードで変化してますよ

日本の過半数は中小で政府の提供ファイルもExcelやぞ
http://www.chusho.meti.go.jp/pamflet/hakusyo/H27/h27/shoukibodeta/h27/html/b1_1_1_2.html

今はPDFが多いだろ
エクセルとかワードファイルなんて必要項目以外も編集出来ちゃってもとファイルの意味ないじゃん
いつの時代の話をしてるの？

俺は派遣でかなり大きな会社(SONYとかと同レベル)で働いているけどExcelめいいっぱい使ってるぞ。
VBAも使いまくってる。
というかVBAの仕事なんだけどね。

現実と願望の区別が出来ない人がいるみたいだね。
それが進むとコンピュータ使うのなんて中小ぐらいしかないなどとなる。

派遣の人にさせる雑用事務仕事ならエクセルくらいしか使えないだろうから仕方ないかな

>>228
まさにこういう人の意見なんだけど、何をもってほとんど使わないと言ってるんだろう？
そんなにたくさんの会社を見てるの？

入力装置としては悪くないプラットフォームだと思う
もちろん神エクセルは論外だけど
小規模のテーブルデータをサクッと作るには便利
ただエクセルのままデータや文書として交換するのはやめてほしいね

>>231
お前より給料貰ってるけどな。

言い訳ばかりじゃたかが知れてる。
何を言っても零細は間違いというわけだ。

>>234
急に給料の話持ち出してどうしたの

雑用事務じゃないってことだろ。

ID:kgcyA64B

いつものフリーターの妄想です

表計算するのに使ってる

↑それには気付かなかった！

フォームを使っていろいろ勉強しながら遊んでるんですが、コードが長ったらしくなるときはcallで別に書いてるんですが、functionの使いどころというかこういうときは絶対functionだ！ってあるんですか？
引数やら戻り値やらネットでみたりするけど使いどころがいまいちで...

>>240
何度も呼び出す機能はfunction
同じ処理をコピペであちこちに書くと
直すとき大変ですし
スコープが狭くなると把握しやすくなるよね

>>240
むしろ関数の方が基本
ここぞというところだけプロシージャ

>>242
戻りが必要なときがFunctionだと思ってた。
「ここぞ」ってどんなとき？

プロシャージャから呼ばれるものは原則ファンクション。とりあえずブーリアン型にしてtrueを返してるわ
プロシャージャはイベントハンドラと、ファンクションのデバッグ用くらいかなー

>>244
ProcからSubProcを呼ぶのは邪道ってこと？

ほとんど哲学の話だから気にしなくていいよ

>>240
馬鹿は死ねよ

値の戻し方だって
関数の戻り値か、ByRef引数か、グローバル変数か、セルか、テキストファイルかは自由自在

>何度も呼び出す機能はfunction
さすがプロは違うなあ

>>248
Document Properyもね。

>>248
Document Properyもね。
>>250
あちゃ、Properyってなんだ？

関数のありがたみがわからない初心者のみんなは副作用、参照透過性、例外安全という観点で関数とプロシージャを比較してみよう
それだけでスキルアップだ
コードがグンと洗練されるぞ
やったね！

> 副作用、参照透過性、例外安全
最近覚えたので使いたくてしょうがないんだろうな w
頓珍漢過ぎて笑うしかないけど

いつも行と列がわからなくなるんだがいい覚え方ある？
列方向とか言われると頭が混乱する

>>253
初心者くん
お勉強は大事だぞ

>>254
Row
Column
それぞれの先頭文字見たら

>>254
途中で書き込んでしまった

https://lambdalisue.hatenablog.com/entry/2013/07/18/134507

見ろ

>>254
今時ほとんど横書きだから「行」と言えば横方向でしょ
一行目って言われて縦読みする奴はあまりいないし w

頓珍漢なお勉強した結果 ⇒ >>255 w

ありがとうございます
これで行列を判別できそうです

>>259
そのうち君にもわかる時が来る
めげずに勉強しよう
今はわからなくても大丈夫だ

constがないから効果半減だぞ

>>261
ごめんねー、頓珍漢な勉強なんてしたくないから w

>>254
長文は3行にまとめろ
この時「3列に」とは言わない
これが行と列の違い

まあ自分もほとんどがFunctionでSubは数えるほどだな。
Subを使うのは求める値を直接値として返すのはデカすぎるときとか。

値を戻す必要のある手続きならFunction
その必要がない手続きならSub

原則的にはこれしかないわけだが
Functionの戻り値以外で値を返す手続きは例外的なものに限るべき

>>252
お前はVBAで、何と何を比較してるの？

>>266
あぁ、それなら認識通りだわ。邪道なのかと思った。

>>254

>>268
横だが、それいいね。今目に焼き付いたわ

>>266
> 値を戻す必要のある手続きならFunction
> その必要がない手続きならSub
複数の値を返したい時は？

> Functionの戻り値以外で値を返す手続きは例外的なものに限るべき
C# の TryParse() 系の奴は例外的だと言う主張ですか？

> お前はVBAで、何と何を比較してるの？
そいつには触れない方がいいかと

配列かユーザー定義、あとは引数を参照にして引数で返すとか。
そのプロシージャの内容で変える。

クラスにするとか場合によっちゃコレクションに複数のクラスを入れて返すとか配列を配列に入れて返すとかする場合も。

複数かどうかではなくそのプロシージャにとってどうあるべきかが重要。

>>271
結局FunctionとSubの使い分けは値を返すかどうかなんかとは関係ないってことだよね

例外もあるってだけで原則は>>266じゃないのか

>>242,>>244,>>252
sub も function も両方ともプロシージャです

副作用あるならsubでないならfunction

副作用が一切ないSub

functionにした事で起こる副作用って何？
可読性とか、解析とかに影響が出るだけで、動作自体はfunctionが完全上位互換だと思ってたんだけど。

どうせグローバル変数弄るんだから、どっちも同じだろ？

SubにしろFunctionにしろ、あんまり分割しすぎるのはBASIC的ではないので、可能な限りGoSubを使いましょう

>>270
＞>>266
＞> 値を戻す必要のある手続きならFunction
＞> その必要がない手続きならSub
＞複数の値を返したい時は？
関係ないものを複数返したいなら多くの場合は設計ミス
関数の責務が複数あると考えていい
関係のあるものを複数返したい場合はそれらを含む別のクラスが隠れているのかもね
何れにせよ複数返したいと思った時点で冷静に考えを整理すべき

＞
＞> Functionの戻り値以外で値を返す手続きは例外的なものに限るべき
＞C# の TryParse() 系の奴は例外的だと言う主張ですか？
いいとおもうよ
あれはパフォーマンス追求するときと並列処理、相互運用ぐらいにしか使わん
実際にref/outを使う標準ライブラリはほとんどない
ParseやTryGetValueは使用頻度が高く、例外でエラー通知するのはオーバーヘッドがあるからoutにするメリットの方が大きいと考えられて例外的に導入されたもの

＞
＞> お前はVBAで、何と何を比較してるの？
＞そいつには触れない方がいいかと

>>280
> 何れにせよ複数返したいと思った時点で冷静に考えを整理すべき
で、結局どうするのさ？

> あれはパフォーマンス追求するときと並列処理、相互運用ぐらいにしか使わん
↑
↓
> ParseやTryGetValueは使用頻度が高く
結局よく使うのか使わないのかはっきりしろよ w
無理矢理反論してるのがバレバレだぞ

入れる穴が複数あるのに出す穴が1つってのが間違ってるんだよ
だから入れる穴から出す

もはやプロさんによるプログラミング脱初心者講座
エクセルマクロはどこいったんや
ほんま役に立たんプロさんばかりやなw

>>281
もう少し理解力つけよう

もう全部参照渡しやっとけば？

>>270
あれはあくまでもVBAでのSubとFunctionの使い分けの指針な

>複数の値を返したい時は？
複数の値を返したい時点で例外的な処理だと思った方がいい
複数の値が必要なら、複数の値をまとめた「何か」を一つ返すのが原則
まあ実際はそうガチガチにはやらんけどな

>C# の TryParse() 系の奴は例外的だと言う主張ですか？
まあ、例外的
あれは、変換が可能かどうかと、変換した値という二つの処理をまとめてるから

>>274
おれもそう思ってはいるが
VBAにはいまでもGoSub Return　ってのがあるからなぁ

>>284
説明も反論もできないなら黙ってろよ w

>>286
> あれは、変換が可能かどうかと、変換した値という二つの処理をまとめてるから
どうみてもその処理はまとめるべきだろ
別々にやれと言うならちょっと頭おかしい

Sub 色の付いたセルの値をクリア()
Dim C As Range
For Each C In ActiveSheet.Range("A1:J25")
If C.Interior.ColorIndex = 15 Then
C.ClearContents
End If
Next
End Sub

で色の付いたセルの値をクリアしたいのですが、結合したセルからは値を消せない的なメッセージが出るのですが、結合しているセルに入っている値を消すにはどのようにすればよいかどなたか教えていただけませんでしょうか？

セルが結合されているかどうか調べて、結合していたら解除すれば？

>>288
C.MergeArea(1).ClearContents

結合セルはバグの温床

神エクセルへの反逆は許されない
事務員さんに信仰を捧げよ

はじめまして
最近vbaでマクロ書くようになりました

Dim lastcol
Dim kokyaku

lastcol = Cells(2, Columns.Count).End(xlToLeft).Column
Set kokyaku = Range(Cells(2, 4), Cells(2, lastcol)).Find(顧客コード).Column

上記はマクロの一部分なのですがこれのColumnでオブジェクトが必要ですというエラーでるのですがどうしたらいいでしょうか。
ちなみにSetをとるとオブジェクト変数およびwithブロックが、、というエラーが代わりにでてきてしまいます。

>>293
これならエラーが出ないと思うけど
Set kokyaku = Range(Cells(2, 4), Cells(2, lastcol))

列番号を取得したいだけならSetはいらない

顧客コードは変数なの？
変数じゃなく「顧客コード」という文字列を検索したいなら

.Find(顧客コード)
ではなく
.Find("顧客コード")

と書かないと

Cellsの使い方が間違ってるんじゃないかね

関係無いとも思うけど、顧客コードを検索して見つからなかったらエラー出るぞ。
まずFindまでをオブジェクトに代入し、代入されたオブジェクトがNothingかどうかをチェックすべき。

あと、変数は全て型指定すること。

どうしたお前ら
いつになくまともやんけ

よくこんな馬鹿を相手にするな

あーなんだ
もうSubとFunctionの話は終わっちゃったのか
ちょっと来るのが遅かったな

>>294
列番号ほしくてColumn付けてたんですよねー
でもSetなくしたらとりあえず実行できました・・・なんでできるようになったのか謎です

>>295
顧客コードは変数です
ユーザーフォームで入力させてそれを判別してるような形をとっています

>>300
初めて1週間ですみませんorz



型式って指定したほうがやっぱりいいんですか・・
もう1つ悩んでることあるのでちょっと書かせてください

ユーザーフォームで顧客コードを検索してそれを別ブックに転記したいんですけどうまくいきません
繰り返し文だと i=0 To 5　みたいに回数を決めないと思いまして、代わりにdo until使ってるんですけどバグっちゃって・・
参考にコードと表のSS貼っておきます
ご教授願います

https://gyazo.com/08befaf20d8d06c1c09571710d6614b6
http://textuploader.com/dp3p2

確かウィンドウをサブクラス化し
てコールバック関数でゴニョゴニョ、、、
なんたらする時メモリーの番地が、あーたらで
それでふんくちおnを使うんだったような??。

今はこんなことしないのかな。

Dim i
i = 0
Dim kekka
Do Until kekka = vbCancel

この辺が意味不明です。
i=0
だと定数みたいになってる。
kekkaも値自体が入ってないのに、do until kekka =2と書かれても。
(vbcancelは組込定数なので、2という数値と同じ)

型は指定した方がいいと思います。

プロパティとメソッドの違いがわかりません
判別する方法とかあるんでしょうか

>>307
MSDNを丸暗記する

>>307
一度新幹線に跳ねられてみればわかるかもよ

>>307
判別して何がしたいの。
VBAなら深く意識しなくて困る事がないんだけど。

Propertyとあるのがプロパティ
そうじゃないのがメソッドだ

>>310
本で見て疑問だったので笑

>>307
シンタックスシュガーというやつだよ
違いはあるともないともどっちともいえる

シンタックス・ショッカーだって！？

板を荒らすなよ

>>303
クオーテーションマークでコメントアウトが出来ますので、どこでどのような処理をしたいのか書いておくと良いかもしれません。

>ユーザーフォームで顧客コードを検索して
UserForm.Valueで入力された値を参照してから該当の表内に検索をかけることになるでしょう。

>Do Until 文
Do Loop文の中でIf kekka = vbOK Thenがコメントアウトになってますのでこれは機能しません。
また、Loopを記述するより先にEnd ifで完結させないとエラーが出るはずです。

書き慣れるまでは変数宣言は上部にまとめておくのも一つの手かと思います。

サーバーに入ってきた仕事の素材を連番のフォルダを手動で管理しております
現在画像のような感じにサーバーに素材が入ったのを確認したらとなりのセルを塗りつぶすというのを手動で管理しています
それを特定のフォルダをexcelで監視させて新しいフォルダが入ったらとなりのセルを
自動で塗りつぶす、ということをvbaではできないでしょうか

可能であればコードも教えていただければ幸いです

画像url↓

Excelで管理する意味がわからない

そこにエクセルがあるからさ

この程度でもお金が発生するんだから知識の安売りしちゃダメだよね

>>317
Dir関数

日本企業は外注には何十万、何百万も払うのに自社の社員が書いたものはタダだと考えてる。

>>317
本題からはそれるけど、セルを塗りつぶすってのはセルの背景色を直接指定するんじゃなくて
条件付き書式にした方がいいと思うよ。
つまり該当セルに「1」とかの値を入力すると勝手に赤い背景色になるようにしとく。
値ならあとで利用しやすいからね。

>>322
VBAごときに価値はない

>>324
VBAスレで吠えるトンスルランドの寄生虫WW

>>323
そしてセル数のぶんだけ重くなる。
規模によるけどね。
色付けても検索とか抽出とか面倒なだけだから自分なら記号でも埋めるかな。
色付けるとすれば視認性をあげるためのオマケ。

わかったつもりになってUIを根底から否定してしまったプロさんw

>>317
開始時刻から終了時刻まで一定間隔でマクロを実行するには？
http://www.max.hi-ho.ne.jp/happy/YNxv9c134.html
を使って
>>321のDir関数を使って指定のフォルダをチェック
みたいな感じで

>>317
こんな馬鹿に管理させる馬鹿会社があるのか

アマチュア事務員VBAerしかいない中小企業なんてこんなもんでしょう

>>326
＞そしてセル数のぶんだけ重くなる。
？

条件付き書式だらけのワークブックなんて開くのもしんどいわw

>>332
条件付き書式「だらけ」？
ひとつで十分だよね？

>>333
ああ、>>323は>>317の個別の事例に特化した話だけをしていたってわけね
俺は（恐らく>>326も）てっきり>>323は一般論を話しているものと思ったよ
「本題とはそれるけど」って書いてあったからかなあ

一般論としてはセルの背景色は条件付き書式で塗りつぶすべきなんていう馬鹿な話はないから

>>334
そりゃだって>>317の画像で言えばB列に条件付き書式を設定すれば十分だし、
色はおまけで値で管理したいだろう？

>>334
Excelの操作（データ整理など）で、
条件付き書式でセルの文字色や背景色を変更するのは一般的なことだと思ってたんだが、どういう点がバカなんだろ？

おっと、IDを消してる人にレスしてしまった…

アマチュア事務員さんの一般論とプロの一般論は異なるということだね
プロはセルに一個一個色を設定するなんてめんどくさいことはしないよ

状態が1つ変わるたびに別の状態を同期させるようなコードは手続き的で非常にメンテナンスしにくい
まずは問い合わせで解決することを考えよう
これを覚えてまた1つ賢くなったね事務員さん

自分で考えない馬鹿には何を教えてもムダ

今のエクセルは下手なVBAerが組んだらゴミの山生成するから気をつけたほうがいいのは間違いない

ブバラー

>>338-340
馬鹿は何も考えない方が良いんだってよプロさんw

>>336
それも度を過ぎると再計算が走って重くなるからVBAで色を塗ってしまったほうがいいという一般論

度を過ぎたときにおこる問題を回避するのが一般論という

それは一般論の一般的な定義ではないねｗ

その程度では重くならんだろ
どんだけ巨大なモンスターブックだよ

>>342
なかなか釣れないね

>>344
これはひどい

重くなってから考えればいいと思うよ
仕様で決めたこと以外は極力手を抜こうぜ

金にならない仕事を勝手にやって問題起こして仕事増やす奴

FileCloseとSub Procの寿命について質問です。
作業中のSafe Backupを作成しようと思い、Shift+Ctrl+Sに
�@ "_01" で終わるファイル名を、"_00" でリネーム保存
�A 続けて "_01"でリネーム保存して元のファイルに戻る
といった動作を割り付けています。
この�@の直後の時、"_01" はプロセス上にいないと思うのですが、SafeBackup
は最後まで正常に走り、"_01" ファイルがプロセス上に戻ってくるのが不思議です。
内部的にはどのような動きになっているのでしょうか。

期間にあったものを抽出する検索ソフト作ってて、optionボタンそれぞれ1年前〜今日、2年前〜今日、全期間ってあってdateadd関数計算して全期間以外はうまく出来るのですが全期間ってどう計算したらいいですか？

>>352
ネタ？
その程度の事をここで聞かないと分からないの？
嘘だろ？

非建設的発言は良くないでしょ。

>>352
でも質問に情報が全く足らないな。
検索されるものは何なの?
別シートに日付のついたデータがあって、そこから検索するとか?

DateAdd使ってるのも良くわからないな。
全期間ってのは他に検索条件が無ければ全データになっちまうと思うんだが。

>>354
テキストファイルから一列ずつ検索。
instr(1,strline,txtSrchWd)
これてヒットしたら、スプリットで切って配列に入れて、(5)に入る日付と比べて正なら抽出したくてやってます。
現在の日付からそれぞれ1年、2年前は計算でうまく抽出出来ますが、全期間は一番古い日付調べておく必要があるんですか？

>>355
全期間だから全部だろ、馬鹿なの？
それとも前提条件を全部書かない馬鹿なの？

君vba出来るんでしょとか言われて簡単なプログラム作成任されて作ったけど管理めんどくさすぎん？
初めはここは数字しか入らんよて言われてたからisNumericだけ判定してたのに数字以外入れると止まっちゃうから漢字とか諸々の対応させられた
そんな感じで他のinputとかアウトプットの要件がころころ変わる
そして全然動かんねーとか言われるイラつく

>>355
全期間ならば現在の日付からの計算は必要なく、一番古い日付を指定しなくともテキストファイルの最終行まで走らせれば良いのでは。

>>357
プログラムの仕様を決めるのはあなた
あなたが使用者に対してルールに沿った入力を求めるのは当然
道具は正しく使われるから道具として機能するのであって、猿に道具を渡しても壊れて返ってくるだけ

会社の要求をどの程度受け入れるか、もう一度冷静に考えたらどうか
個人的には、猿には付き合う必要ないと思ってる

入力規則でガチガチにしろ

>>357
人に使わせるような真面目なツールにVBAは無謀でしょ
品質担保しようとしたら凄まじいコストがかかる
自分しか使わない、数行で終わる、使い捨ての、エクセル操作に特化したマクロがVBAのターゲット

トレードオフで論破

>>307
一番簡単な方法はその都度オブジェクトブラウザで確認すること
アイコン表示されているから一目瞭然

>>357
バカほど我儘な要求を平気でするからなぁ。で、「俺は忙しいからプログラムなんて覚える暇が無いんだ、暇なヤツはいいなぁ」とか吐かしたりさぁ。

俺は「お前のオツムに合わせてたらキリがねえわバカ」ってあからさまに言ってるよ。だいたい、数字を入力するところに平気で文字を入力して「何ｊこれエラーとかマジやってらんない」とか。
やってらんねえのはこっちだっての！

使い方守れない馬鹿も馬鹿だけど本気で業務システムを作ろうってんなら
誰でも使えるようにデザインする努力も必要

入力文字種を守れない馬鹿がいる環境なら自由に手入力させる余地を残すな

とりあえずドキュメントなりマニュアルなりを作って
読まん奴まではフォロー出来ないとはっきり意思表示する

そっから先は職場の人間関係の話なので何とも

そういう人に使わせる前提のある程度しっかりした作りのアプリはエクセルみたいな非生産的なプラットフォームでは普通は作らないね
エクセルは個人用のちょっとした処理をサクッと実行したい時とかに使うといいよ
まあその個人用のちょっとした処理だと今度はPowerShellのほうが楽なんだけどな
帯に短し襷に長しってやつだ

> そういう人に使わせる前提のある程度しっかりした作りのアプリ
エクセルには無理なんやなく
プロさんには無理なだけやんけw
言い訳だけは上手やねw下手やけどw

VBAでUTF-8(BOM無し)ファイルを読み書きする最速の方法は何ですか？
ADODB.Streamだと遅いしBOM無しにするための2度読み書きでさらに遅いし

>>364
数字とか入力文字列の制限とかくらいはプログラム側でエラー処理するべきだろ。

>>367
程度にもよるが普通作る。
1回動かして終わりになる場合は作らんが。

>>369
アセンブラで最適化したDLLを作って読み込む

>>369
nkfでBOM付けて処理して、ポスト処理で外すw

2007から2016に変えたらCSVの処理速度なんかがかなり低下した気がするんですが気のせいかな？

>>369
コードページを明示的に指定するdllを作るのがいいんじゃないか？
俺はそうしてる。自動判定なんていらん。（言い過ぎ？）

>>374
CSV言うても読み方も書かんとわからん。
workbook.openなんかはバージョン上がるにつれてどんどん遅くなってる。2003までは一瞬だったのに・・・

>>369
こいつ程度の頭でもできる最速の方法なのか？
そもそも最速の定義は何なのか。同一ハードウェア上でという前提条件があるのかないのか等々
馬鹿は考えもなしに｢最高とか最速｣などの用語を使いたがる

>>376
あー、基本workbook.openで開いてます…
ここで結構時間かかってるのかな
あと、セルの数字を一つ一つ計算したり置き換えたりって処理もかなり遅くなってるような
配列でまとめてとりこんで配列で吐き出すって感じの方が速いのかな

まだ色々と確認中なのですがいろんな物がこれまでよりやたら遅くなってる気がして…

表計算ソフトなんだかた視覚効果なんかいらないと思うんだが何故かMSはそういうのに拘りがあるようで

それいったら殆どの機能が不要になるけど
表計算の上に無秩序に機能を拡張したコンセプトのよくわからないソフト
素人にはこういうのがいいんだよ

>>380
スマホタブレット世代の若いヤツはそれをいいとは思わないだろ。

誰かwbsのイナズマ線を自動で引いてくれるソース書ける人いない。。。？

どこから初めていいかすら、分からない。

>>382
まずは息を30分停める練習をしてください。
それができたら来てください。

>>382
1. WBSの入力サンプルを用意する
2. 1に基づいてイナズマ線を手動で書いてみる
3. 2に基づいてどういう入力のときにどういう出力をすればいいのか整理してパターン化する
4. 3に基づいてコーティングする
5. 4を動かして2と同様の出力になるかどうか確認する

>>382
> どこから初めていいかすら、分からない。
流石にその状態だとこっちもどこから教えたらいいかすら、わからん
Excel 稲妻線 あたりでググって適当なアドイン使ったほうがいいんじゃね？

Project買えばいいのに
これだからExcel陶酔者は困るんだ

VBAなんだから、何はともあれマクロの記録からだろ。

VBAの本に書いてあるコードをひたすらパソコンに写経して実行してればVBAできるようになりますか？

>>388
3日でオッケー

>>388
タイピングの能力上がるだけかな

>>382
まずはWBSとイナズマ線の定義を明確化して
全てはそこからだよ

GG佐藤のせい

ワールドビジネスサテライト?

「イナズマ線」でググったらこんなの出ましたけど？

イナズマ線を簡単に引くExcelマクロを作りました
http://www.fin-itnews.com/entry/2015/08/12/031032
Sub イナズマ線描画()
'FreeformBuilderオブジェクトを宣言
Dim InazumaLine As FreeformBuilder
'始点を設定
Set InazumaLine
'以降の点を結んでいく
'繰り返し用変数i
Dim i As Integer
'列の位置固定用変数
'上から下にセルをなめていく。0以外の数値ならイナズマ線を引く
For i
'数値以外はスキップ
If Not () Then
'0もスキップ
ElseIf
'イナズマ線を引く（正の数なら＞、負の数なら＜）
Else
End If
Next i
'終点を設定
'イナズマ線を描画
'見た目の編集（青の太線）

>>386
Redmineでもなんでもいいけどオープンソース使えばいいよ
ビジネスマンなら無駄な出費は最小限に抑えなきゃ

イナズマ線でほんとにイナズマになるのってまずいんだから
直線引いとけばいいんじゃいないかな

フリーの高機能プロジェクト管理ソフト「OpenProj」 …
http://fnya.cocolog-nifty.com/blog/2009/02/openproj-57cb.html

1.シェイプの直線を挿入するのをマクロの記録で記録する。
2.記録されたコードの中で始点と終点と思われる部分を適当に変えて実行してみる。
3.2で得られた任意の2点で直線を引くマクロを2回実行し、その時1回目の終点と2回目の始点を同じ座標にする。
4.3の実行結果後、マクロの記録で2つの直線をグループ化するのを記録する。
5.n個の直線を引いた後で一度にグループ化するように処理を変更する。
6.n+1点の配列を引数にして上記を実行するようにプロシージャを作成。

マクロの記録は余計なコードが大量に含まれるから関係ないものを削除して実行を繰り返すと良いコードになる。

>>382
まずは全裸になって町を駆け抜けてくさい

(´・ω・｀)b

特にエラーがあるわけでもなくブレークポイントを設置しているわけでもないのに
黄色い矢印が出て止まるのってなんなんでしょうか
必ず起きるというわけでもなく出たり出なかったな上に続行ボタンを押せば特に問題もなく終了するので
発生原因がまったくわからないのですがこれバグかなんかですか？
@2013

>>400
スクリーンショット見せて

>>400
必ず止まるわけじゃないだろ。

バグかどうか分からんけど、わりとよくある。
PC再起動で直る。

ウィンドウフォーカスが外れるとオブジェクトが使えなくなってしまい止まるコードは良くある。
コーディング上の問題

>>400
「VBAProjectのコンパイル」を実行してからF5押してもダメか？
たまーに同様のケースでこれで解決する場合があったんで。

>>400
エラー起きた後に続行すると動くって事は
画面が完全に表示しきれてないのに読み込もうとするからじゃない？
初心者ならエラー起きる箇所の前にwait入れる
プロなら完全に表示しきったら次の処理に行くようにする

>>405
馬鹿丸出し

>>400
多分バグ
ブレイクポイントを設定したままセーブして
立ち上げ直すと起こる奴のことじゃないかな？
そこにブレイクポイントを再度設定して
外してやって起きるか試してみ？

エラーの出た行のコード晒せ
話はそれからだ

エラーメッセージとエラーコードもな

セル内にアルファベットがあるかどうか判断する関数おしえて

>>410
馬鹿は死ねよ

>>410
VBAじゃなくて関数でいいの？
そしたら>>411に聞いたら？
きっと親切に教えてくれるよ

「VBAじゃなくて関数」って方言かなにか？

なんでエラーが出たことになってんの?
全く理解出来ん。

Sumifsの引数って内部的にどうなってるんでしょう?
ABABAB…って繰り返すので、
Byval何とかAs何とかってのが延々並んでいる状態?
それとも繰り返し用の書き方がある?

>>415
馬鹿は死ねよ

ParamArray

2007でオブジェクトブラウザでみると、ずらずらと引数書いてあるな

テーブル1に、row数が同じテーブル2を合体させたい
データ、書式設定、条件付き書式やドロップダウンリストごとテーブル1に合体させたい。
どうやるのが無難ですか？

全く作り方が思い付かないからご教授お願いします。

�@入力の所に数字を入れる。
�Aup or downに数字が入れる。

例　入力45 up1 down2

�Bupとdownを計算 -1
�C入力45がコードのCとDの間で下のDとして�Bで計算された-1上を選択。
�D判定が×だから○まで上に上がりBを選択。

※計算が+なら下へ、判定○ならその左のコードを取得、×なら○まで下へ。

※上下に移動していって該当がない、移動なし、判定×ならエラー。

こんなのを作りたいんですが上下移動がどうしたらいいか分かりません。

>>420
ループが書けるなら何も難しいポイントはないと思うけど？

どんな状況で使うんだそれwww

>>419
テーブルで結合せず普通にRangeでくっつけてテーブルにすれば良いのでは？そっから書式はどーにでもなる

>>421
Do while Not EOF(filNo)
　Line Input ♯filNo,strtxtLine
　ReDim Presrve arrline(cntLine)
　cntLine=cntLine+1
Loop

実際はこれでtxtファイルを読み込んでから1行ずつ見ていって判定処理したいんだけど、無理かな？

>>424
無理じゃない
テキストファイルを配列に読み込んで処理すればいい
配列はワークシートのセルとまったく同じ構造なので、ワークシートで動くプログラムが作れたらRange (Cells)の部分をArray型に置き換えるだけ

i=1
range("i:2").select
でエラーが返ってくるのはなぜなんだぜ？

変数を含んだ行をコピペしようと思って、これでシンプルにできると思ったらできなかった

平成30年のつもりで
H30 = 2018
とかやってた時に
Range(“A30:H30”)が”A30:2018”と解釈されたら困るだろ

>>426
iを"で囲んじゃってるからじゃない？

i人を囲ってるに空目した

VBA昨日から始めたんですが
小数点第1位の繰り上げ処理がしたいけどわかりません
cells(1,1)=cells(1,2)/3とか簡単なやつをひたすら書いてるだけなのですがどうか力を貸してください

右クリック
書式の設定

>>430
切り上げ？繰り上げ？

>>430
worksheetfunction.roundupで良いんじゃないの？

>>431
すいません、切り上げです。
>>432
マクロの結果が123.1だったら124にしたいってことです
>>433
切り上げたいセル=そのコードでいけますか？

worksheetfunction以外ないでしょ。
わざわざvba使う意味がよく分からないけど。

関数でだけでいいですよね。
ありがとうございます

切り上げ程度の簡単な処理でも、VBAだけで全部作るよりWorksheetFunctionの方が速い？

知らん実際に作ってみろよそして共有してくれ
家じゃexcel無いしめんどい

めんどいのに意味のないレスはしたくなる馬鹿のジレンマ

わざわざ車輪の再発明をするこたぁねー

ジャップ企業「わざわざ車輪の再発明をするこたぁねー」
アップル「iPodでウォークマンを再発明しました！」
アップル「iPhoneで携帯電話を再発明しました！」
アップル「iPadでタブレットを再発明しました！」

iPodがウォークマンの再発明としか思えないから
日本からああいう製品は出なかったんだろうな

アップルの成功はAppStoreをオープンにしてアプリを爆発的に増やしたこと
日本企業はオープンにせず独自企画が好きだもんな
iPodの頃なんて大して注目されてなかったし

どこがじゃ。
全然オープンじゃねえだろ。

iPodのインパクトだろ。
こういうものはガジェオタが飛びついて一般に浸透してくから、最初は一般に注目される必要は無い。

デザインの力は大きかった。

条件付き書式って名前とかタグみたいな個を識別できるようなプロパティないの？
条件にごちゃごちゃ付け加えると重くなるからvba側で操作したいんだけど
特定できそうなところでなんちゃって判定するしかないのこれ

ない上に知らん間に増殖する
全消しして追加がいいよ

>>446
> ない上に知らん間に増殖する
そうなんだよね
条件付き書式の整理とか統合とかのコマンドがほしいわ

条件付き書式が設定されたセルを調べることは可能
https://support.office.com/ja-jp/article/8313ee09-b95d-444a-8103-6bbf3691e82b

>>447
確かに欲しい。でも作ろうと思えば作れる事に気がついた。
追加されるとは考えられないしやるか・・

>>449
作って公開してくれ〜

ACCESSのフィールドをExcelに転記するとき、
例えばそれぞれ
1
2
3
4
5
と入っているレコードを
下から3つを転記したい(3、4、5の順で)場合どのようにすればよいのでしょうか？
CopyFromOrdersetでRowsMaxを3にすると1、2、3となり、下の3件3、4、5の順では転記できないでしょうか？
SQLのORDER BYを使うと5、4、3の順となりなかなかうまくいきません。
どなたか解決策を教えていただけないでしょうか？

>>451
Sortすりゃいいだろ

>>451
https://msdn.microsoft.com/ja-jp/library/cc408450.aspx
>コピーは Recordset オブジェクトの現在の行を開始点として行われます。
らしいから、現在行を３行目にしとけばいいんじゃない

>>451
https://msdn.microsoft.com/ja-jp/library/cc408450.aspx
>コピーは Recordset オブジェクトの現在の行を開始点として行われます。
らしいから、現在行を３行目にしとけばいいんじゃない

>>452-454
早速にありがとうございます。
確かに転記後にソートでどうにでもなりそうですね。
できれば転記時にできればとおもっておりました。
カーソル位置を3行目にする事で解決はおっしゃるとおりですね。
ただ私の最初の前提が不十分な解説のため申し訳ありません。データが増えていった場合でも下から3つを取り出したい場合はどうすればよいか苦慮しています。
ExcelVBAのように、Offsetが使えたらデータが増えていっても下から3つだけを取り出すという風にできていいなと思うのですが。

>>455
topを使って馬鹿はいい加減に引っ込め

>>455
現在行をn-3行目にしとけば良いんじゃない

>>456
単純にtop取るんじゃなくて、descでorder byしてtop取ったやつをもう１回order byする必要があるんだが
そんなSQLがすらすら書けるようなレベルのやつはこんな質問しないし

もう一回order byは必要無いだろ。
Excel側で対処すれば良い。

>>457
こいつみたいに、後から出てきて回答してることをグタグタ書く馬鹿も来なくていいよ

>>458
それが自分でできてりゃ
>SQLのORDER BYを使うと5、4、3の順となりなかなかうまくいきません。
てな事にはなってないだろう

>>451
このあたりを参考にしてみ
http://www.accessclub.jp/bbs2/0051/beginter16860.html

EAK

マクロ・VBAの勉強がしたいです
どのような方法で勉強を進めるのが理想でしょうか
エクセルのレベルはVLOOKUPなどのメジャーな関数を使える程度のレベルです
ちなみに会社員です

>>463
何をしたいのか明確な目的が必要
楽したい！ってモチベーションがないと続かないよ
トライ&エラーを繰り返すこと
教本だけでは身に付かないから、実践は必ず必要

>>463
Vlookupの欠点を知ってるよね？

vloookupをdisる様になったらエクセル使いとして一人前

>>463
今からプログラミングを覚えるならVBAなんて化石言語はやめましょう
言語的に近いC#がいいと思いますよ
VBA程度の事は全て出来ますしもっと色々と出来るので推奨

体系的に勉強する価値なんてないよ
やらなきゃいけないことをググって試してみての繰り返し
プログラミングのスキルやセンスを磨きたいなら他の言語で学んだ方がいい

>>463
こんなところで聞かなきゃいけない時点でもうダメだな

>>463
VBAを覚えて何がしたいのか知らんが、仕事で活用するなら
まず、エクセル関数をもっと覚えて関数で何とかできるようになりましょう

事務処理ならエクセル関数だけで大概のことはできる
VBAが必要な場面はあまり無いと思う。せいぜいファイル操作くらいか

すいません、processingについてのスレッドはありますでしょうか？

使いわけでしょ。
数千あるチェック項目の内、1日100個ぐらいずつをチェックしていき、その集計結果で1日の結果を関数で出し、更に1ヶ月のト―タルなんかを関数でやってたら重くてどうにもならなくなったりするし。

銀行でDBから取ってきたデ―タが辻褄があってるかを調べるなんて仕事をしたことが有るんだが、その為にシステム組んでる側の(と言ってもそいつが組んでる訳じゃない)奴がチェック用に用意したsumproduct多用ブックは酷かった。
触る度に5分とか10分とか待たされた。
VBAで組んだら一瞬になったけどね。

自動再計算を切るのも諸刃の剣だし。

プログラマじゃない普通の会社員がExcelを使うのにVBA勉強すんのは普通だろ。
なんで不必要なC#とかやらにゃならんのだ。
プログラマってほんと頭でっかちやな

VBAって二十年くらいなんの進歩もないよね
この言語を覚えて次に全く役に立たないじゃん
キャリアアップの為にも意味ないよね

>>473
プログラマじゃないとしても今時エクセルだけじゃ話にならんでしょ
誰だって日常的にディレクトリ階層とエクセル以外のファイルを扱う
ツールの拡張がスクリプト言語になってることは良くある
自分のWindowsを管理するにはpowershellを使うね
得に最近需要が高まってるのはREST APIやスクレイピング技術だな
いずれもVBAでもできんことはないが果てしなく古臭い構文と開発環境、貧弱なライブラリのせいで死ぬほど生産効率悪いんだよね
マゾにはオススメかもしれんがノーマルな人にはオススメできんな

>>474
VBAは進歩がないのがメリットとも言える。
pythonなんかは2と3で動作仕様が異なる上、モジュールのバージョンも気にする必要があって、別PCで同じ環境を構築しようとすると結構面倒。
その点、VBAはどんなPC、エクセルのバージョンであっても安定して動作するって意味では楽だな。

色々言語触ったけど、自分の結論としてはどの言語が良い悪いではなく、結局適材適所で使い分けが大事。

WindowsUpdateの影響で個々のPCで不具合でまくるが

もっと短いのにならないかな。
Vlookupとか長いので、GonとかPnとかさ。
Sheet1も地味に長いよね。
Werでいいよね。

事務員はプログラマじゃないからVBで十分
他の言語を扱うなら担当の部署に回すか外注する
部署で自分しか扱えない言語を触りだしたら間違いなくそいつは地雷

iPad上でもWinで書いたVBAファイルは動きますか？
ファイルをやり取り出来る？

「エクセルで十分」ってよく聞くフレーズだけど
「料理するには石器で十分」のような強烈な違和感を感じる

VBAって結構リストビューになかされない？最近win10になったけどバグる。
そもそもリストビュー使わない？

>>480
Office365じゃないとVBAは動かなかったはず。ファイルはやり取り可能だが

>>476
> その点、VBAはどんなPC、エクセルのバージョンであっても安定して動作するって意味では楽だな。
VBAはいいとしてもその上のExcelの動作がバージョンによって変わる
特にグラフ周りはグダグダ

普通の事務職がVBAを勉強したいっていう何の変哲もない書き込みにおまえら首の皮を取ったようにレスしててワロタ
おまえらみたいなのが少数派だってことを認識した方がいいぞ

>>485
首の皮を取ったは違うよね

会社員=事務員じゃないし、首の皮取ったら職失うし

悪いこと言わんからちんこの皮は取っとけよおまえら

鬼の首OTL

もう俺はおまえらに何も言えない
首の皮を取って出直してくる

本気でプログラミングするわけでもない事務員なら、より簡単に色々出来ることが多い言語を選ぶのが正解だろ？
マゾはVBAから始めてもいいけど完全に選択肢間違えてっぞ

>>491
本気じゃないからVBでいいんだよ

ExcelVBAを学びたい人の目的はExcel上での自動化なので、他の言語提案する馬鹿は、要求仕様もRFPも設計も出来ない馬鹿だと思う

真に事務屋に必要なのはAutoHotkeyとかUWSCみたいな即物的なマクロツール

つーかいい加減VBAなんてゴミ捨てろよ
手抜き目的でプログラムなんて興味なしが大半なんだからそのへん雑なjsが最適だろ
型だのSetだのCallだのいらねーんだよハゲ

えっ、エクセルでJS使えるの？

エクセルと心中する気持ちがある
目指せエクセルマスター
それぐらい本気で取り組む気持ちがあるならVBA
そこまでの覚悟がないなら他の簡単で使い道が多い言語にしたほうがいいね

>>496
カスタム関数がjsで書けるようになる。
現在ベータテスト中のはず。
またpython対応も進められてるはず。

ここぞとばかりに湧いてきよった教えたがりのプロさん達w

>>484
エクセルのグラフや統計ツールは場当たり的な作業で使うもので、自動化には向かない。
そういうのはpythonとかの方がいいよ。

>>500
エクセル並のグラフ作れるライブラリ教えてくれたら考える

ExcelのjavaScript対応なんて、Googleスプレッドシートの後追いじゃないの？
サーバーサイドじゃなくクライアントで動くなら助かるけど、
でたぶん、APIがあるだけで関数書式はVBAと同じ手続き踏まされると予感

excelは圧倒的な普及率が強み
多少使い勝手が悪くても使う理由

>>502
もちろんクライアントサイド。google spreadシートのはサーバーサイドでちょっと複雑な処理書くと制限に引っ掛かったりで非常に遅く、jsの仕様もes5相当の古い書き方しかできず辛い。
その点excelはedgeのjsエンジンであるchakraコアがそのまま動き最新の機能が使える。
まさかのasync/awaitまで使えて夢が広がる

dim rng as range
for each rng in selection.rows
以下略

こんな感じで複数行選択して各列に対して操作を行いたいんですよ
でその操作の中で行をコピー・挿入だったり削除だったりするんですけど、それがselection内だったりするとselectionそのものが変わっちゃったりするんです
複製された行に対しても操作しようとしたり、削除されて上に1行繰り上がって本来操作されるべき列が飛ばされたり
なんかいいアイディアないですかねぇ

>>482
同じことあった。ライブラリのバージョン違うと動かんのねあれ
客が使うオフィスのバージョン確認したわ

>>505
動作を理解していない馬鹿頭の問題だろ

どなたか教えて頂けませんか。
Debug.Printが毎回追記されていくのがうっとうしくて、下記のような記述をしました。

Private Sub im_del()
Application.VBE.Windows("Immediate").SetFocus
SendKeys "^a", False
SendKeys "{Del}", False
End Sub

Sub ABCDE()
Call im_del
Debug.Print "ABCDE"
End Sub

ところが、一瞬"ABCDE"の記述が出現した後、すぐ消えてしまいます。
"ABCDE"を出力したあとに、ctrl+A、Del、が処理されているように見えるんですが、これは何故起こってるんでしょうか？

間にwaitを入れてみようや

>>507
SendKeysはWindowsさんに伝言をたのむ命令
その伝言が伝わる前に直接連絡した方が先に届いてもおかしくない
DoEventsいれてみ

ここはほんとうに素晴らしいスレッドですね。　
>>456とか>>459とか>>466とか雰囲気悪くするだけだからもうこなくていいよw

>>510
こいつも雰囲気悪くしてるからw

>>511
おまえが一番雰囲気悪い

>>510
ゆとり世代？

5chに来て何言ってんだ
建前抜きにした罵詈雑言の罵り合いも殺伐とした空気も煽りも自演も5chの醍醐味だろう
綺麗なインターネットを求めてるなら実名でブログでもツイッターでもやりゃいい

pythonは次期Excelに搭載されないことが決定しただろ馬鹿

マジかーvbaとpythonとjsの悪魔合体楽しみにしてたのに