2015-01-01から1年間の記事一覧

vba Excelのセル設定パターン

・セルの数字設定 例)行: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…

優秀なマクロ

ワークブックを開いているかどうか調べる - Excel VBA Tips

シートデータ比較

Sub Compare_Test()' 'beforeのファイル/シート選択 'afterのファイル/シート選択 Dim BfFilePath As Variant: BfFilePath = "xxx" Dim BfFileName As Variant: BfFileName = "xxx.xlsx" Dim BfSheetName As Variant: BfSheetName = "before" Dim AfFilePath…

Excelのファイル指定方法

■ファイル ActiveWorkbook … 現在、アクティブなExcelThisWorkbook … マクロが書き込まれている自身のExcelActiveSheet … 現在、アクティブなシートThisWorkSheet … マクロが書き込まれている自身のExcel ■アクティブ化Workbooks(sample.xlsx).Activate■例 D…

VBScript テキスト 置換

VBScript テキスト 置換

get path for bat fie

pushd %~dp0 timeout /T 5 popd

Excelの別ファイルへのセルコピー

============================================================= Sub 追加機能()'' 追加機能 Macro' 'ユーザ側でマージ先を指定 Dim OpenFileName As String Dim readBook As Workbook ' 相手ブック Dim readSheet As Worksheet ' 相手シート ' OpenFileNam…

ExcelのF1キー無効化マクロ

①個人用マクロを作成 開発⇒記録⇒保存先を"個人用マクロ"でセーブ ②個人用マクロに以下の関数を追加 Sub auto_open() Application.OnKey "{F1}", "" End Sub

teratermマクロ内でのウィンドゥ位置設定方法

teratermのマクロで複数ウィンドゥを起動した場合に、ウィンドゥが重なるのが煩わしい場合には、以下のコードでウィンドウ位置の指定が出来るとのこと。 dispstr #$1B"[3;100;200t" ^^^ ^^^ ① ② ①縦の位置 ②横の位置

初めてのブログ

初めてのブログ マイペースで更新出来たらいいな