Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


17090 / 76732 ←次へ | 前へ→

【65099】Re:枠線の非表示
質問  おとと  - 10/4/16(金) 9:51 -

引用なし
パスワード
   Jakaさん返信有難う御座います。
説明不足ですみません。枠線消すコードは分かるのですが
対象のブックをアクティブにする所が分かりません。
以下のコードで

  objApp.Workbooks.Add
  '非表示にする
  objApp.Application.Visible = False
  '確認ダイアログを表示させない
  objApp.DisplayAlerts = False
  
  Set objBook = objApp.ActiveWorkbook
  Set objSheets = objBook.Worksheets
  'シート1のみ残して後は削除
  For i = 2 To objSheets.Count
    objBook.Sheets(2).Delete
  
    
  Next

  'シート1の書き込み
  Set objSheet = objBook.Sheets(1)
  
  'セル全体の設定
  With objSheet
    
    .Name = "ガス切れ伝票"
    .Cells.Font.Name = "MS Pゴシック"
    .Cells.Font.Size = 11
    .Columns("A:A").ColumnWidth = 11.5     'A列の列幅を指定する例

       
  End With

全てのコードでは無いのですが単純に.Columnsの下に
ActiveWindow.DisplayGridlines = False
を入れたのですがエラーになってしまいました。
もしよろしければご教授ください。

1 hits

【65086】枠線の非表示 おとと 10/4/14(水) 12:59 質問
【65089】Re:枠線の非表示 Jaka 10/4/14(水) 14:10 発言
【65099】Re:枠線の非表示 おとと 10/4/16(金) 9:51 質問
【65100】Re:枠線の非表示 mura 10/4/16(金) 10:15 回答
【65105】Re:枠線の非表示 おとと 10/4/17(土) 8:26 お礼

17090 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free