- ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Acc→Excel編集 セルのセンタリング)
Acc→Excel編集 セルのセンタリング
このQ&Aのポイント
- ACCよりEXCEL編集にて、セルのセンタリングが出来ずに困っています。オートフィットや、シートのヘッダ、フッター編集などはナ難なくできたのですが、以下のロジックで『RangeクラスのHorizontalAlignmentプロパティを設定できません』のエラーが返ってきてしまいます。
- EXCEL編集にてセルのセンタリングができない問題について困っています。オートフィットやシートのヘッダ、フッター編集はうまくいっているのですが、設定したロジックで『RangeクラスのHorizontalAlignmentプロパティを設定できません』というエラーが出てしまいます。
- EXCEL編集の中でセルのセンタリングができません。オートフィットやシートのヘッダ、フッター編集は問題なく行えているのですが、以下のロジックで『RangeクラスのHorizontalAlignmentプロパティを設定できません』というエラーが表示されます。
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
昔やったけど今回できんかった・・ ナンデカナと調べた結果 xlナントカ はExcelの定数なのでそのままは使えないような? ので 案1 Microsoft Excel x.x Object Library に参照設定をして Sub testXL() Dim objEXCEL As Excel.Application Dim objBook As Excel.Workbook Dim objSheet As Excel.Worksheet Set objEXCEL = CreateObject("Excel.Application") Set objBook = objEXCEL.Workbooks.Open("g:\_z.xls") Set objSheet = objBook.Sheets("sheet1") objSheet.Cells(1, 1).HorizontalAlignment = xlCenter objBook.Close SaveChanges:=True Set objSheet = Nothing Set objBook = Nothing objEXCEL.Quit: Set objEXCEL = Nothing End Sub とやるか 案2 参照設定はせずに xlCenter の値ををExcelから調べて ?excel.Constants.xlCenter → -4108 直接渡すかではどうでしょう。
お礼
参照設定既にしている! って思ってましたが してませんでしたぁ><; 他の設定は参照設定なくしてできたので・・・ ということで、参照設定にて解決しました^^ ありがとうございました!!!