検索
タグクラウド
プロフィール
yoshimatsuさんの画像
yoshimatsu
60過ぎのおっちゃんです。同じ年齢層の中ではそこそこパソコンが使える方だと自負しています。今まで会社等で学んだ知識等を紹介していきたいと思います。

広告

posted by fanblog

2017年04月02日

ExcelVBA入門ファイルを開く・閉じる・保存する・印刷する





マイクロソフトアクセスの記事はこちら

人気ブログランキングへ



にほんブログ村 IT技術ブログ ソフトウェアへ
にほんブログ村


Open


ワークブックを開く場合は「Open」を使用します。

例)

Sub フィルを開く()

Workbooks.Open Filename:="F:\test"

End Sub

上記の記述でFドライブの「test」というワークブックが開きます。

引数は色々ありますが、1つだけ記載しておきます。

上の例で下のようにReadOnly:=Trueと追記すると「読み取り専用」で開きます。

Workbooks.Open FileName:="F:\test" , ReadOnly:=True


Close


ワークブックを閉じる場合は「Close」を使用します。

例)

Sub フィル閉じるく()

Workbooks("test").Close SaveChanges:=True

End Sub

上記の記述で「test」というワークブックが保存して終了します。

最後のTrueをFalseにすると保存しないで終了します。

a0002_012127.jpg

Save


新規ワークブックに名前を付けて保存する場合は「SaveAs」を使用します。

例)

Sub フィル閉じる()

Workbooks("Book1").SaveAs Filename:="F:\test2.xlsx"

End Sub

上記の例では新規Book1をFドライブに「test2」という名前を付けて保存します。

引数に「Password :=”aaaaaa”でパスワードが設定できます。

a0002_012010.jpg

PrintOut

印刷する場合は「PrintOut」を使用する。

例)

Sub 印刷する()

ActiveSheet.PrintOut

End Sub

ActiveSheetのところをActiveBookにするとブック全体を印刷します。

Range(“A1:D5”) .PrintOutにすると設定した範囲を印刷します。

引数として代表的なものを記載しておきます。

From・・・印刷開始ページ番号を指定します。省略すると1ページから印刷します。

To・・・印刷終了ページ番号を指定します。省略すると最後のページまで印刷します。

Copies・・・印刷部数を指定します。省略すると「1部」印刷します。

Preview・・・Trueを指定すると、印刷前に印刷プレビューを表示します。

False又は省略すると直ちに印刷します。




レンタルサーバー『 ヘテムル 』が《月額1,000円(税抜)》から利用可能になりました!

ビジネス利用にも最適な高スペックレンタルサーバー『ヘテムル』は
これまで月額1,500円(税抜)にてサービスを提供していましたが、
このたび、長期契約なら《月額1,000円(税抜)〜》で利用できるようになりました。

『ヘテムル』は256GBの大容量ディスクにくわえ、
独自ドメインを無制限で設定できるマルチドメイン機能や、
WordPressサイトを簡単に作成できる簡単インストール機能など
多彩な機能が魅力のレンタルサーバーです。

サーバーは、大容量16GBメモリ/Xeon6コアCPU搭載のハイスペック。
データベースサーバーにはSSDを採用しCMS利用時のDB高速化を実現。快適にご利用頂けます。
さらにRAID構成+バックアップによりサービスの安全性を高めています。

プロのクリエイター、有名企業など利用実績多数。
まずは15日の無料お試しから!



この記事へのコメント
コメントを書く

お名前:

メールアドレス:


ホームページアドレス:

コメント:

※ブログオーナーが承認したコメントのみ表示されます。

この記事へのトラックバックURL
https://fanblogs.jp/tb/6121575
※ブログオーナーが承認したトラックバックのみ表示されます。

この記事へのトラックバック
Build a Mobile Site
スマートフォン版を閲覧 | PC版を閲覧
Share by: