訳あって、セルに罫線が引かれているかどうかの判定をどうするかわからず。 某質問サイトさまでわかりました。ありがとうございます。 罫線が引かれているセルの個数を調べるには if Range("A1").Borders(xlEdgeTop).LineStyle <> xlNone then msgbox "〇"...

Ｆ8キーで1行ずつ再生している時、途中をすっとばしたい、と思われることがありませんか？ そんな時は、移動したい行にカーソルを置き、「Ctrl＋F9」キーを押せばＯＫ牧場です。 但し、宣言行（Dim~ではじまる）にカーソルを置いて、上記ショートカットキーを押すと、エラーが出てしまいますので、それ以外の行にしてください。 ...

シート名だけ取得している変数等から、ブック名を見るにはどうすればいいのか…と悩んでいたら、下記サイトさまが。いつもお世話になっております。 VBAのParentとは 「Parent」プロパティを使えばよいということですね。 msgbox range("A1").parent.parent.name と入力すると、ブック...

TEXTJOIN　区切り記号を挿入しながら複数の文字列を連結する ということで、以下のように文字と文字の間に、任意の文字を入れてセルデータを結合するというナイスな関数だそうです。 2016バージョンからだそうですが、マクロってみるとできそうですね。 =TEXTJOIN({"/","+","="},TRUE,A1:D1)...

最近、やっとシグマの理解ができるようになりました。 「５分で分かる！総和記号「Σ（シグマ）」の計算方法」の素敵サイトさんの説明がわかりやすいです！ありがとうございます！ その中のループ説明ですが、これはPHPでしょうか？自分でもVBAで暇つぶしに書いてみました。 sub test() dim sum as long d...

印刷設定につきまして、色々と調べました。 VBAにて、一番オーソドックスなのはこちらかと。 印刷ダイアログボックスを表示するには ただ複数シートを選択した際そのすべてに印刷設定をし、さらにそのプリンター独自の設定をしたい場合は、以下がご参考になるようです。 複数シート印刷時のページ設定 で、上記は2003くらいの記述な...

散々探して、田中先生のコラムから、「DisplayFormat」で見ればいいことがわかりました。 「Excel 2007のSortオブジェクト」 あと、ネタ帳さんの 条件付き書式の数式を取得するExcelマクロ から、数式を引っ張り出して、確認用に使用させていただきました。...

エクセルのVBAを打っていて、上記エラーにぶち当たりました。 いや、あるのに！ イミディエイトウィンドウに workbooks.open filename:=thisworkbook.path & "＼kuma.xlsx" と打って、エンターを押すとちゃんとファイルが開くのに、ないって言われても…（涙） ちなみ...

表の再表示がめんどくさい、という話を社員さんが密やかにされていたので、マクロってみました。 Sub 非表示のシートを再表示する() Dim ws As Worksheet For Each ws In Worksheets If ws.Visible = False Then 'シートが非表示ならば ws.V...

上記の通りで、ワードを開いて全部の文章をコピペしたらうまくいかなかったので、色々と調べてみました。 これは便利！ワードからエクセル、エクセルからワードへ変換する方法 HTML形式で保存するといいとは目鱗ですね～発想が素晴らし～ でも、これをマクロにするとなると…わからない… ということで（？）、表に特化したサイトさんを...