・セルの数字設定 例)行:1、列：2のセルに数字123を設定 Cells(1, 2).Value = 123 ・セルの文字列設定 例)行:1、列：2のセルに文字列Sampleを設定 Cells(1, 2).Value = 'Sample' ・セルの値削除 例)行:1、列：2のセルをクリア Cells(1, 2).Clear ・フォント…

Public Function doModal() Me.ShowEnd Function Private Sub Cancel_btn_Click() Unload MeEnd Sub Private Sub OK_Btn_Click() Dim PathName As String Dim FileName As String Dim pos As Long pos = InStrRev(Me.TextBox1.Text, "\") PathName = Left(Me…