トリスタン、あなた良い味出してる。多崎礼さんの「レーエンデ国物語」にハマっています。とても良い。ここ最近は「本好きの下克上」を幾度となく読み返す日々を送っていましたが、多崎作品の「重くて暗くて長(そう)」な感じもとても好きなのです。「本の姫
現役システムエンジニアである筆者が、仕事やオフの時間を充実したものにするため、業務の効率アップや、日々話題になっているいろいろなことがらについて書いています。 IT技術者ならではの視点から、様々な考察を述べれたらと思います。
多崎礼の「レーエンデ国物語」はいいぞ!(感想。ネタバレなし)
トリスタン、あなた良い味出してる。多崎礼さんの「レーエンデ国物語」にハマっています。とても良い。ここ最近は「本好きの下克上」を幾度となく読み返す日々を送っていましたが、多崎作品の「重くて暗くて長(そう)」な感じもとても好きなのです。「本の姫
サンプルソースは次のとおり。'シートの表示形式の切替えSub Example32() ActiveWindow.View = xlPageBreakPreviewEnd Subにほんブログ村
ExcelVBAでシートを一部編集可能で保護する方法【シートの操作】
サンプルソースは次のとおり。'シートを一部編集可能で保護するSub Example31() With Sheets("Sheet1") .Range("A1").Locked = Fals
サンプルソースは次のとおり。'シートを保護するSub Example30() Sheets("Sheet1").ProtectEnd Subにほんブログ村
ExcelVBAでシート見出しの色を変更する方法【シートの操作】
サンプルソースは次のとおり。'シート見出しの色を変更するSub Example29() Sheets("Sheet1").Tab.Color = vbRedEnd Subにほんブログ村
サンプルソースは次のとおり。'シートを移動するSub Example28() Sheets("1").Move After:=Sheets("2")End Subにほんブログ村
サンプルソースは次のとおり。'シートをコピーするSub Example27() Sheets("1").Copy After:=Sheets("2")End Subにほんブログ村
サンプルソースは次のとおり。'シート名を変更するSub Example26() Sheets("Sheet1").Name = "test"End Subにほんブログ村
サンプルソースは次のとおり。'シートを非表示にするSub Example25() Sheets("Sheet2").Visible = FalseEnd Subにほんブログ村
サンプルソースは次のとおり。'シートを削除するSub Example24() Application.DisplayAlerts = False Sheets("Sheet1").Delete Applicat
サンプルソースは次のとおり。'シートを挿入するSub Example23() Worksheets.Add after:=Sheets("Sheet1")End Subにほんブログ村
サンプルソースは次のとおり。'罫線の詳細な位置を設定するSub Example16() With Range("A1:C3") .Borders(xlEdgeTop).LineStyle = xlContin
サンプルソースは次のとおり。'罫線を設定するSub Example15() With Range("A1:C3").Borders .LineStyle = xlContinuous .Weight = x
サンプルソースは次のとおり。'文字のスタイルを変更するSub Example14() Range("A1").Font.Bold = True Range("A1").Font.Underl
サンプルソースは次のとおり。'文字の大きさを変更するSub Example13() Range("A1").Font.Size = 20End Subにほんブログ村
サンプルソースは次のとおり。'フォントを変更するSub Example12() Range("A1").Font.Name = "MS ゴシック"End Subにほんブログ村
サンプルソースは次のとおり。Sub Example09() Rows(1).RowHeight = 10 Columns("A").ColumnWidth = 5End Subにほんブログ村
サンプルソースは次のとおり。Sub Example08() Rows(1).Delete Columns("A").DeleteEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example07() Rows(1).Insert Columns("A").InsertEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example06() Range("A1").ClearEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example05() Range("A1").Delete Shift:=xlUpEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example04() Range("A1").Insert Shift:=xlDownEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example03() Range("A1").Copy Range("A2").PasteSpecial Paste:=xlPasteValuesEn
サンプルソースは次のとおり。Sub Example02() Range("A1").Cut Range("A2").Select ActiveSheet.PasteEnd Subにほ
サンプルソースは次のとおりSub Example01() Range("A1").Value = Date Range("A2").Value = "angela"En
7-zipで複数のフォルダやファイルを個別圧縮するバッチファイル
VBScriptで7-zipを呼んで、複数のフォルダを個別に圧縮するバッチファイルです。 7-zipは従来のz
VBScriptでLhaplusを呼んで、複数のフォルダを個別に圧縮するバッチファイルです。 Lhaplusは
Excelマクロの高速化設定をクラスにまとめる方法【VBA入門】
前回紹介したExcelマクロを高速化する設定をクラスモジュールにまとめると、様々なマクロで再利用(使い回す)できるようになります。Excelマクロの高速化設定をまとめたクラスクラスモジュールの実装は以下のようになります。ここでは仮にProc
Excelで1行おきに色を塗って縞模様にする方法!【VBA入門】
Excelで大きな表を作成した際に、1行おきに色を変え縞模様にすると見易さが大きく変わります。昔からの定番として「条件付き書式」にで1行おきに背景色を設定するという方法がありますが、今回はこの作業をExcelマクロで自動化してしまおう!とい
Excelマクロの高速化!画面更新や自動計算を停止する設定方法
Excelマクロの使い方に慣れてきて、業務の自動化が進んでくると、次に気になるのがマクロの実行時間だと思います。時間に余裕のあるときであれば「業務が自動化」されただけで十分満足なのですが、繁忙期はそうも言っていられませんよね。Excelマク
iPhone12miniにangelaの手帳型スマホケースを着けてみた!
iPhone12miniに機種変して数日経ちました。元々使っていたスマホがiPhoneSE(第1世代)だったため、スマホの性能的にも、バッテリーの寿命的にも機種変をせざるを得ない時期でした。こちらの記事に詳細を書いています。ただ、それ以上に
iPhone12miniへ機種変更!iPhoneSEとマイネオ編
久しぶりの更新です。iPhone12miniを幸運にも発売日(2020年11月13日)に手に入れたので、機種変の手順をレポートします。(新色を避けて、64GBでも256GBでもない半端な容量のモデルを選んだのが、功を奏したのかもしれません。
Wordのコメントや変更履歴を表示しないで印刷する方法【マクロ自動化】
設計書やプレゼン資料などをWordで作ったときに、対顧客やグループ内で文書の内容をレビューする場合、本文には直接書き込まずに、欄外に捕捉文を追加できる「コメント機能」が便利です。しかし、ひとたびコメントが入力された文書を印刷しようとすると、
fNHKのEテレで放送しているびじゅチューン!という番組では、世界の美術作品をテーマにしたアニメーションが放送されています。作詞・作曲・アニメーションの制作を、すべてひとりで担当している井上涼さんの天才っぷりが炸裂していて、一度聴いたら病み
鬼頭明里がカワイイ!高校や演じたキャラ・上手すぎイラストを徹底調査
「鬼滅の刃」の竈門 禰豆子(かまど ねづこ)役、「Re:ステージ! ドリームデイズ♪」の月坂紗由役などを演じている、声優の鬼頭明里さん。2014年のデビューから5~6年の間に、数多くの人気アニメにヒロイン役として出演する一方で、2019年1
内田真礼が刑事ドラマにゲスト出演!アキバレンジャー以来の女優業に注目
今夜(5月14日(木))放送される、俳優の内藤剛志さん主演の連続ドラマ「警視庁・捜査一課長2020」(テレビ朝日系、木曜午後8時)の第6話に、人気声優でアーティスト、女優としても活躍する内田真礼(うちだまあや)さんがゲスト出演します。役どこ
QRコード作成方法!VBAでクリップボードのURLを変換できる?
パソコンで検索していたページをスマホでも見たいときって有りますよね。URLをスマホで打ち直したり、ページにたどり着いた検索キーワードを思い出して、スマホで再検索することもできますが少々面倒くさい。。。そんなとき、こんな感じでURLをQRコー
エクセルで目次をつくるハイパーリンクの設定方法!【マクロ自動化】
どんな業務であれ、Excelで資料をつくることは日常的にあります。なんでもかんでもExcelで作ろうとするのは無理があるように思えてならないのですが、便利すぎるツールなので致し方ないですね。Excelファイル(ブック)にシートが増えてきたと
メタルスタンプの代用!革小物にアルファベット小文字を刻印する方法
メタルスタンプ ~初心者が買うべきか悩む道具の筆頭~キーホルダー、キーケース、ブックカバーに長財布…etc。レザークラフトでハンドメイドできる革小物は数多く有りますが。ハンドメイドだからこそ、最後の仕上げにしてみたくなるのが文字の刻印です。
革のコバを別たちで直角に切るコツ!(レザークラフト初心者講座)
革を直角に切りたければ、「別たち」を使うべし!レザークラフトを趣味で始めた人たちは、最初に必要最低限の道具を一揃い買い集めると思います。かく言う私も、レザークラフトの師匠である会社の後輩モリ君を休憩に誘っては、「最初に何買ったらいいの?」と
クロスステッチ ~元々は刺繍のテクニック~革小物を作るときの基本の縫い方は「平縫い」ですが、「クロスステッチ」という縫い方をすると、縫い目自体が模様のようになって、革小物をオシャレに飾り付けることができます。元々「クロスステッチ」とは刺繍に
ヌメ革と牛革の違い!オススメの革の種類と特徴を紹介(レザクラ入門)
ヌメ革って何の動物の皮?ヌメ革は牛革です。また豚革のヌメ革も有ります。私がレザークラフトの趣味を始めた、まだヌメ革のことがよく分かっていなかった頃に、レザークラフトの先輩である会社の後輩に、「ヌメ革って何の動物の革?牛革??」と聞いたことが
浅草橋駅周辺のレザーショップを訪ねてみた感想!(都内革問屋巡り)
浅草橋に広がるレザー天国レザークラフトを趣味にしている人たちにとって、聖地とも言える場所がいくつかあります。東京都内では浅草橋駅周辺が筆頭に挙げられるでしょう。浅草橋の駅周辺を散策するだけで、レザークラフトに必要なものは全て揃うと言っても過
カタリナ・クラエス様の魅力にたらしこまれた!はめふらアニメの感想
「乙女ゲームの破滅フラグしかない悪役令嬢に転生してしまった…」のアニメにハマってしまった。。。これはまずい、楽しすぎる。カタリナ様が魅力的すぎるっ!今回の記事は、Excel/VBAの解説でも、レザークラフトのハウツーでもありません。ただのア
バネホックをカシメ打ちで取り付けるコツ!(レザークラフト入門)
レザークラフトのボタン付け、カシメるって何だ!?革小物にボタン(バネホック)を付けたい場面は多く有ります。キーホルダーや財布にバッグなど、革だけでは実現しづらい機能を追加するために必須のものから、あると便利、気が利いていてオシャレなどの装飾
Word2016で開発タブを表示したい【Office365】
ExcelのVBAに比べたら知名度は低いのですが、WordにもVBAによるマクロ機能があります。Wordでマクロ(VBA)を使用したい場合、初期設定のままでは「開発タブ」が表示されていません。手動で設定を変更して、表示させなければなりません
菱目打ちのハンマー音をパズルマットで小さくする方法(レザークラフト入門)
楽しいひと時をより快適に ~レザークラフトの騒音対策~ひととおりレザークラフトの道具を揃え、簡単な小物から作りはじめ、少しレザークラフトに慣れてきた頃に、ふと気づくことがあります。それは、菱目打ちをハンマーで叩くときの音。その音量は騒音に分
トコ面にツヤを出す方法!トコノールとトコフィニッシュの使い分け方
トコ面にツヤを出したい!革小物をハンドメイドを趣味にする人にとって、コバ(革製品の端っこ、切れ端、切り口の部分)と同様、トコ面もツヤツヤにしてみたいと思うものですよね!コバの処理は作品の完成前に仕上げとして行いますが、トコ面は作品を作り始め
菱目打ちでステッチをまっすぐに空ける方法!(レザークラフト入門)
針を刺すな、穴を空けよ…レザークラフトで手縫いをする場合、あらかじめ縫い穴(ステッチ)を革に空けてから縫います。後工程の縫う段階では修正不可能な重要な工程です。たとえキーホルダーのような小さな革小物でも、デザインによっては結構な数の縫い穴を
ロウ引き糸の擦り切れ予防!溝切りの方法 他(レザークラフト初心者講座)
革小物は見た目が9割!という訳ではないですが…手間ひまかけてロウ引きした糸は、革小物が完成した後もキレイな状態で長持ちさせたいものですよね。革も糸も道具も方法も、自分がこだわりたいポイントにとことんまでこだわれるのが、既製品にはないレザーク
手縫い糸の毛羽立ち防止!ロウ引きの方法 他(レザークラフト初心者講座)
レザークラフトの手縫いは、縫う前に針と糸の下準備が必要です。丁寧に糸にロウを引いておくと、縫い穴への通りがよく、切れにくい丈夫な糸になるため、手縫いも進め易くなります。また、糸の毛羽立ちや緩みも無くなり、ステッチの見栄えがグッと良くなります
コンビニ印刷した型紙を木工用ボンドで補強する方法(レザークラフト初心者向け)
コンビニ印刷した無料型紙を補強したいレザークラフトの趣味を始めたばかりの頃は、財布やカードケースなど「作りたいもの」は有っても、それらを作るための型紙 は書けない人が殆どではないでしょうか?ネットで「レザークラフト 型紙 無料」などと検索す
コバ磨きでツヤを出す方法!推奨の材料や基本テク他(レザークラフト初級講座)
コバ磨きで綺麗なツヤを出したい!革小物のコバ(革製品の端っこ、切れ端、切り口の部分)を「綺麗に磨きたい」、「ツヤを出したい」というのは、レザークラフトを始めた人たちの誰もが持つ悩みだと思います。自分好みの革で作った、世界にひとつだけのカード
個人用マクロブックに保存した自作のマクロは、エクセルのリボンに登録しておくと必要なときに簡単に呼び出せるので便利です。今回の記事では前回、前々回紹介したマクロを組み合わせて、エクセルシートの体裁を整えるマクロを作成し、そのマクロをリボンに登
エクセルで個人用マクロブックを作成する方法!【マクロ自動化】
このサイトで紹介しているようなエクセルの小技をまとめたマクロは、特定のエクセルファイルではなく、多くのエクセルファイルに対して実行できるように、コードを「個人用マクロブック」に保存すると便利です。ですが、「個人用マクロブック」はエクセルが初
エクセルで拡大(ズーム)や縮小倍率を揃える方法!【マクロ自動化】
パソコンの画面の解像度が向上するにつれ、エクセルの表示倍率の適切な値は人によってまちまちに成ってきました。フルHD(1920×1080)の解像度の場合、100%の倍率では「少し小さいかなぁ~?」と思うこともしばしば。(それは解像度の問題では
エクセルでカーソル位置をA1(左上)に揃える方法!【マクロ自動化】
Excelで作成したファイルをお客さんに納品するときなど、「誰かに見せる」機会に、昔から行われている儀式というかお作法が有ります。全てのシートのカーソル位置を左上に移動する!Excelにはファイル自体にカーソル位置を覚えておく機能があります
Excel2016で開発タブを表示したい【Office365】
Excelでマクロ(VBA)を使用したい場合、初期設定のままでは「開発タブ」が表示されていません。手動で設定を変更して、表示させなければなりません。今回は、このタブの追加方法を説明します。久しぶりに自宅用のOfficeを更新(Office3
テレワークやリモートワークの仕組みを解説!(在宅勤務の基礎知識)
新型コロナウィルスの感染拡大により、在宅勤務をする人が増えてきました。テレビやラジオ、ネットのニュースで「テレワーク」や「リモートワーク」という言葉を聞かない日は有りません。テレワーク(離れて・働く)もリモートワーク(遠くから・働く)も言葉
Wi-Fi(ワイファイ)が繋がらないときの原因特定と解決方法!
不要不急の外出自粛要請が出て、家の中で過ごす時間が増えてきました。スマホを使う時間も自ずと増えてきたのではないでしょうか?家の中では無線LANルーターに接続して、スマホのキャリアのパケット通信量を節約するのが定石ですが、Twitterのタイ
相変わらず世界中で猛威を奮っている新型コロナウィルスの影響で、東京オリンピックの開催に暗雲が漂っています。元々、新型コロナの影響がなければ、7月24日~8月9日の17日間に渡って実施される予定ですが、世界中で感染拡大が収束しない現在、「東京
堤駿斗の戦績と階級は?井之上尚弥2世が狙う東京五輪出場の可能性は?
井上尚弥2世と呼ばれるボクシング界期待の新星高校生の頃に全日本選手権を制覇したことから、井上尚弥2世とも称される、アマチュアボクサーの堤駿斗(つつみはやと)さんが話題です。今夜(3月15日の11時から)放送される情熱大陸でも特集が組まれてい
松本まりかの声優としての一面とは?本人にとって黒歴史なのか!?
女優の松本まりかさん、ここ1~2年ほどの間に急激に知名度が上がってきていますね。今から2年前の「ホリデイラブ」で主人公の夫を誘惑する小悪魔な里奈役を演じたのが大きかったのでしょう。この番組出演をきっかけに、以降様々なドラマやCMで彼女の姿を
JR西日本のCM曲!「私からあなたへ~」を歌っているのは誰?
季節の流れは早いもので、新型のコロナに怯えながら日々をやり過ごしていたら、3月になってしまいました。先週末、突然トイレットペーパーが店頭から消えてしまい急に訪れたペーパーレス社会に、普通に在庫が切れかけていた我が家は大ピンチです!!!(残り
コナミコマンドとグラディウスが世界に広めた「裏技」とは何だ?
「上上下下左右左右BA」レトロゲーマーであれば知らない人は居ないであろう、裏技の代名詞コナミコマンドです。先日コナミコマンドの生みの親であるゲームプログラマー・橋本和久氏が旅立たれました。コナミコマンドが初めて世に出た、ファミコンソフトのシ
るろうに剣心(るろ剣)の巴役は誰?有力候補の女優さんを大胆予想!
るろ剣の実写版映画、『るろうに剣心 最終章 The Final/The Beginning』が7月3日(金)と8月7(金)に連続公開されることが発表されてからというもの、各キャラクターのキャストが誰になるのか、日に日に明らかになってきました
TRICK(トリック)とミッドサマー 共通点・類似点を徹底検証!
TRICK(トリック※実際は末尾のKが左右反対向きです。)は仲間由紀恵さんと阿部寛さんが主演を務めて、当時コアなファンの間で話題となった、ちょっと怖い推理ドラマです。1作目が放送されたのが2000年の春なので、今年で丁度20周年です!ネット
70代のスマホデビュー!シニアにオススメのSIMカードの選び方
携帯電話大手3社にくらべて、格安でスマートフォンが利用できる【格安スマホ(MVNO)】が一般に浸透してきて数年経ちました。iモードやEzwebがガラケーに搭載されていた頃からインターネットの世界に馴染んでいる世代(30代~40代)の人たちは
水筒に付いたコーヒーのニオイや汚れをキレイに落とす簡単な方法!
エコで経済的なマイボトルを持ち歩くのが再び流行っています。少し前までは500mlくらいのサイズが一般的でしたが、最近では200ml前後の「超ミニ水筒」が新たなジャンルとしてヒット商品になっているようです。500mlの容量があればペットボトル
「ブログリーダー」を活用して、モランさんをフォローしませんか?
トリスタン、あなた良い味出してる。多崎礼さんの「レーエンデ国物語」にハマっています。とても良い。ここ最近は「本好きの下克上」を幾度となく読み返す日々を送っていましたが、多崎作品の「重くて暗くて長(そう)」な感じもとても好きなのです。「本の姫
サンプルソースは次のとおり。'シートの表示形式の切替えSub Example32() ActiveWindow.View = xlPageBreakPreviewEnd Subにほんブログ村
サンプルソースは次のとおり。'シートを一部編集可能で保護するSub Example31() With Sheets("Sheet1") .Range("A1").Locked = Fals
サンプルソースは次のとおり。'シートを保護するSub Example30() Sheets("Sheet1").ProtectEnd Subにほんブログ村
サンプルソースは次のとおり。'シート見出しの色を変更するSub Example29() Sheets("Sheet1").Tab.Color = vbRedEnd Subにほんブログ村
サンプルソースは次のとおり。'シートを移動するSub Example28() Sheets("1").Move After:=Sheets("2")End Subにほんブログ村
サンプルソースは次のとおり。'シートをコピーするSub Example27() Sheets("1").Copy After:=Sheets("2")End Subにほんブログ村
サンプルソースは次のとおり。'シート名を変更するSub Example26() Sheets("Sheet1").Name = "test"End Subにほんブログ村
サンプルソースは次のとおり。'シートを非表示にするSub Example25() Sheets("Sheet2").Visible = FalseEnd Subにほんブログ村
サンプルソースは次のとおり。'シートを削除するSub Example24() Application.DisplayAlerts = False Sheets("Sheet1").Delete Applicat
サンプルソースは次のとおり。'シートを挿入するSub Example23() Worksheets.Add after:=Sheets("Sheet1")End Subにほんブログ村
サンプルソースは次のとおり。'罫線の詳細な位置を設定するSub Example16() With Range("A1:C3") .Borders(xlEdgeTop).LineStyle = xlContin
サンプルソースは次のとおり。'罫線を設定するSub Example15() With Range("A1:C3").Borders .LineStyle = xlContinuous .Weight = x
サンプルソースは次のとおり。'文字のスタイルを変更するSub Example14() Range("A1").Font.Bold = True Range("A1").Font.Underl
サンプルソースは次のとおり。'文字の大きさを変更するSub Example13() Range("A1").Font.Size = 20End Subにほんブログ村
サンプルソースは次のとおり。'フォントを変更するSub Example12() Range("A1").Font.Name = "MS ゴシック"End Subにほんブログ村
サンプルソースは次のとおり。Sub Example09() Rows(1).RowHeight = 10 Columns("A").ColumnWidth = 5End Subにほんブログ村
サンプルソースは次のとおり。Sub Example08() Rows(1).Delete Columns("A").DeleteEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example07() Rows(1).Insert Columns("A").InsertEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example06() Range("A1").ClearEnd Subにほんブログ村
サンプルソースは次のとおり。'シートの表示形式の切替えSub Example32() ActiveWindow.View = xlPageBreakPreviewEnd Subにほんブログ村
サンプルソースは次のとおり。'シートを一部編集可能で保護するSub Example31() With Sheets("Sheet1") .Range("A1").Locked = Fals
サンプルソースは次のとおり。'シートを保護するSub Example30() Sheets("Sheet1").ProtectEnd Subにほんブログ村
サンプルソースは次のとおり。'シート見出しの色を変更するSub Example29() Sheets("Sheet1").Tab.Color = vbRedEnd Subにほんブログ村
サンプルソースは次のとおり。'シートを移動するSub Example28() Sheets("1").Move After:=Sheets("2")End Subにほんブログ村
サンプルソースは次のとおり。'シートをコピーするSub Example27() Sheets("1").Copy After:=Sheets("2")End Subにほんブログ村
サンプルソースは次のとおり。'シート名を変更するSub Example26() Sheets("Sheet1").Name = "test"End Subにほんブログ村
サンプルソースは次のとおり。'シートを非表示にするSub Example25() Sheets("Sheet2").Visible = FalseEnd Subにほんブログ村
サンプルソースは次のとおり。'シートを削除するSub Example24() Application.DisplayAlerts = False Sheets("Sheet1").Delete Applicat
サンプルソースは次のとおり。'シートを挿入するSub Example23() Worksheets.Add after:=Sheets("Sheet1")End Subにほんブログ村
サンプルソースは次のとおり。'罫線の詳細な位置を設定するSub Example16() With Range("A1:C3") .Borders(xlEdgeTop).LineStyle = xlContin
サンプルソースは次のとおり。'罫線を設定するSub Example15() With Range("A1:C3").Borders .LineStyle = xlContinuous .Weight = x
サンプルソースは次のとおり。'文字のスタイルを変更するSub Example14() Range("A1").Font.Bold = True Range("A1").Font.Underl
サンプルソースは次のとおり。'文字の大きさを変更するSub Example13() Range("A1").Font.Size = 20End Subにほんブログ村
サンプルソースは次のとおり。'フォントを変更するSub Example12() Range("A1").Font.Name = "MS ゴシック"End Subにほんブログ村
サンプルソースは次のとおり。Sub Example09() Rows(1).RowHeight = 10 Columns("A").ColumnWidth = 5End Subにほんブログ村
サンプルソースは次のとおり。Sub Example08() Rows(1).Delete Columns("A").DeleteEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example07() Rows(1).Insert Columns("A").InsertEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example06() Range("A1").ClearEnd Subにほんブログ村
サンプルソースは次のとおり。Sub Example05() Range("A1").Delete Shift:=xlUpEnd Subにほんブログ村