VBA Library - [新]パソコン忘備録

VBA Library

library vba

本項は書きたての記事です。正確な情報は公式サイト、公式ドキュメント、記載の参照サイトでご確認ください。

ライブラリ一覧

No	Name/GithubLink	Args	Return	Description, etc
--	setA1All	--	--	--
--	setSheetObjName	--	--	--

ライブラリコード

setA1All

Sub setA1All()
  Dim WB As Workbook
  Set WB = ActiveWorkbook
 
  Dim WS As Worksheet
  For Each WS In WB.Worksheets
    WS.Activate
    WS.Cells(1, 1).Select
  Next
  WB.Worksheets(1).Activate
End Sub
 

setSheetObjName

ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).Name = objSheetName
 

ダイアログ

msgbox "テキスト", vbアイコン種 + vbボタン種, "ダイアログのタイトル名"

ダイアログ　選択肢ボタン

vbOKOnly	0
vbOKCancel	1
vbAbortRetryIgnore	2
vbYesNoCancel	3
vbYesNo	4
vbRetryCancel	5
vbOK	1
vbCancel	2
vbAbort	3
vbRetry	4
vbIgnore	5
vbYes	6
vbNo	7

クリップボード

With New MSForms.DataObject
    .SetText buf      '変数の値をDataObjectに格納する
    .PutInClipboard   'DataObjectのデータをクリップボードに格納する
End With