2009-03-24から1日間の記事一覧
Sub pastepaste() Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False End Sub Sub main() Dim myCBCtrl As CommandBarButton Set myCBCtrl = Application.CommandBars("Cell").Controls.Add(Type:=msoC…