エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
ACCESS Excelの出力について
すみません。MoveNextが抜けてました。 Private Sub Excel_Out() Dim oRs As Recordset Dim strSQL As S... すみません。MoveNextが抜けてました。 Private Sub Excel_Out() Dim oRs As Recordset Dim strSQL As String Dim Ex As Excel.Application 'エクセルリンク用変数(App) Dim Wb As Excel.Workbook 'エクセルリンク用変数(App) Dim Ws As Excel.Worksheet 'エクセルリンク用変数(App) Dim FileName as string Dim X As Long Dim Y As Long FileName = "×××××.xls" 'エクセルファイルの指定 Set Ex = New Excel.Application 'エクセルとのセッション開始 Set Wb = Ex.Workbooks.Open(FileName) 'ワークブックの指定