VBAマクロの作成、実行、記録方法
お知らせ：当社は、お客様により充実したサポート情報を迅速に提供するため、本ページのコンテンツは機械翻訳を用いて日本語に翻訳しています。正確かつ最新のサポート情報をご覧いただくには、本内容の英語版を参照してください。
マクロとは？
マクロは、特定のタスクを手動で繰り返し実行する代わりに、自動で実行できる特別なプログラムです。Visual 基本 for アプリケーション（VBA）は、マクロを記述するために使用されるプログラミング言語です。Zoho Sheet では、VBA エディタを使ってマクロの作成、編集、実行、管理が可能です。
マクロを作成する方法：
- ツール > VBA マクロ > マクロの作成 の順に移動します。
- 表示されるマクロ作成ダイアログで、適切なマクロ名と説明を入力します。
- 入力が完了したら、作成をクリックします。
- VBA エディタでマクロコードを記述します。
- 作成が完了したら、保存をクリックします。
すぐに使えるサンプルマクロコード：
行の非表示・再表示
- Sub HideUnhideRowColumn()
- 表計算シート('Sheet1').Columns('A:E').非表示 = 真
- 表計算シート('Sheet1').Columns('C:D').非表示 = 無効
- 表計算シート('Sheet1').Rows('11:15').非表示 = 真
- 表計算シート('Sheet1').Rows('12:13').非表示 = 無効
- End Sub
行の切り取り・コピー・貼り付け
- 非公開 Sub CopyCutRow()
- WorkSheets('Sheet1').Rows(2).Copy WorkSheets('Sheet1').Rows(4) //2行目をコピーして4行目に貼り付け
- WorkSheets('Sheet2').Rows(2).Cut WorkSheets('Sheet1').Rows(4)//2行目を切り取り、4行目に貼り付け
- End Sub
セルの値の変更に基づいてメールを送信
- 非公開 Sub Worksheet_Change(ByVal Target As Range)
- Set watchRange = Range('B1:B100') '監視するセル範囲を想定しています
- If Not Intersect(Target,watchRange) Is Nothing Then
- If Target.値 = 'メールを送信する' Then
- ThisWorkbook.HasRoutingSlip = 真
- With ThisWorkbook.RoutingSlip
- .Recipients = Array('SendEmail@Zoho.com') '複数の宛先にメールを送信できます
- .件名 = 'タスク 完了'
- .メッセージ = 'メール content' & Target.Row 'セルの値をメールで送信
- .AttachWorkbook = 真
- '初期設定ではファイルがメールに添付されます。不要な場合は
- '.AttachWorkbook を無効にしてください。
- End With
- ThisWorkbook.Route
- End If
- End If
- End Sub
Workbook 開く event と 新規 sheet 作成 event
- REM ThisWorkbook タブ
- 非公開 Sub Workbook_Open()
- Msgbox('私は開く event です',-1,'Welcome 戻る!')
- End Sub
- 非公開 Sub Workbook_NewSheet(ByVal sh As Object)
- Msgbox('私は新規 sheet event です。シートを作成しました！',-1,' 名前を付けてください ')
- End Sub
Worksheet 変更する event
- REM Sheet タブ
- 非公開 Sub Worksheet_Change(ByVal Target As Range)
- Application.EnableEvents = 無効
- オン エラー Goto ENEV
- REM 追加する your コード below
- Msgbox('私は変更する event です',-1,'おっ、良い変更ですね！')
- ENEV:
- Application.EnableEvents = 真
- End Sub
マクロをデータするには:
- Tools> VBA Macros> データ Macro に移動します。
- 表示される データ Macro ダイアログで、データしたいマクロの 名前を入力してください。'使用する Relative 参照' を好みに応じてチェックまたはチェックを外すことができます。
- 完了したら、データ をクリックします。
- マクロの記録を停止するには、(停止するアイコン) をクリックします。また、表示する コード をクリックして記録したマクロ コードをVBAエディタで表示できます。もしくは、Macro List をクリックして、作成済みのマクロ一覧を表示可能です。
絶対参照 - セルは $列番号$セル番号 で参照され、マクロの記録時に使用中の同じセルでマクロが実行されます。
相対参照 - セルは '$' の制約なしで参照され、マクロ実行時の位置から相対的なセルでマクロが実行されます。
Zoho CRM 管理者向けトレーニング
「導入したばかりで基本操作や設定に不安がある」、「短期間で集中的に運用開始できる状態にしたい」、「運用を開始しているが再度学び直したい」 といった課題を抱えられているユーザーさまに向けた少人数制のオンライントレーニングです。
日々の営業活動を効率的に管理し、導入効果を高めるための方法を学びましょう。
- Zoho Workerly Home
- Forums
- Connect With Us:
- Zoho Recruit Home
- Forums
- Connect With Us:
Zoho Campaigns Resources
Zoho WorkDrive Resources
New to Zoho Workerly?
New to Zoho Recruit?
New to Zoho CRM?
New to Zoho Projects?
New to Zoho Sprints?
New to Zoho Assist?
Related Articles
スプレッドシートでのマージテンプレートの使用
お知らせ：当社は、お客様により充実したサポート情報を迅速に提供するため、本ページのコンテンツは機械翻訳を用いて日本語に翻訳しています。正確かつ最新のサポート情報をご覧いただくには、本内容の英語版を参照してください。 Zoho Sheet の Merge テンプレートを使用すると、動的データ項目を含むスプレッドシートを作成できます。データは外部ソースから取得し、Zoho Sheet にファイルとして保存したり、関係者にメールで共有することも可能です。 ...スプレッドシート内の値を検索して置換
お知らせ：当社は、お客様により充実したサポート情報を迅速に提供するため、本ページのコンテンツは機械翻訳を用いて日本語に翻訳しています。正確かつ最新のサポート情報をご覧いただくには、本内容の英語版を参照してください。 スプレッドシートで値を検索して置き換えるには： ...アイコンに移動し、「検索と置き換える」を選択します。 現在のワークシートで検索する値を入力し、発見した値の間を移動するには アイコンを使用します。 アイコンを押して検索を調節し、置き換えを実行します。 ...結合
お知らせ：当社は、お客様により充実したサポート情報を迅速に提供するため、本ページのコンテンツは機械翻訳を用いて日本語に翻訳しています。正確かつ最新のサポート情報をご覧いただくには、本内容の英語版を参照してください。 複数の指定されたテキスト文字列を単一の文字列に結合します。 構文 CONCATENATE(text; [text1]; ...) text: マージしたいテキスト文字列が含まれているテキストまたは範囲です。たとえば、'Zoho'という文字列。 備考 アンパサンド記号 (&) ...複数のセル/範囲を選択
お知らせ：当社は、お客様により充実したサポート情報を迅速に提供するため、本ページのコンテンツは機械翻訳を用いて日本語に翻訳しています。正確かつ最新のサポート情報をご覧いただくには、本内容の英語版を参照してください。 複数のセルまたは範囲を選択するには: アイコンをクリックして、シートタブの下のドロップダウンメニューから 表示する を選択してください。 「複数選択」トグルを有効にします。 この操作により、エディターにウィジェットが追加され、複数選択を迅速に 有効にする または 無効にする ...隣接するセルにデータを入力
お知らせ：当社は、お客様により充実したサポート情報を迅速に提供するため、本ページのコンテンツは機械翻訳を用いて日本語に翻訳しています。正確かつ最新のサポート情報をご覧いただくには、本内容の英語版を参照してください。 セル範囲にフィルシリーズを実行するには: データを入力したいセル範囲を選択してください。最初のセルにはソースデータが含まれていることを確認します。 アイコンに移動します。 データメニューの中から、フィルを選択します。 データを入力する方向を決定します。 メモ: ...