2006-06-16から1日間の記事一覧
worksheet.Columns(1).Hidden = True
VBEのメニューから 表示→プロパティ ウィンドウ→プロパティ→オブジェクト名 で名前を変更
Public Sub makeTextFile(fileName As String, buff As String) Dim fileNo As Integer fileNo = FreeFile Open fileName For Output As #fileNo Print #fileNo, buff Close #fileNo End Sub
ツール→参照制約→Microsoft XML, v?.0を選択して追加(http://www.microsoft.com/downloads/details.aspx?FamilyID=993c0bcf-3bcf-4009-be21-27e85e1857b1&DisplayLang=ja) Dim xDoc As MSXML2.DOMDocument ' DOM Parserオブジェクトを生成する Set xDoc = …
Private Function showFileDialog(ByVal title As String) As String Dim selectedFileName As String selectedFileName = "" With Application.FileDialog(msoFileDialogOpen) .title = title .AllowMultiSelect = False .InitialFileName = ThisWorkbook.p…