Access VBA質問箱 IV

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

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


7967 / 9994 ←次へ | 前へ→

【5208】Re:Excelへのエキスポート
発言  小僧  - 05/6/2(木) 8:53 -

引用なし
パスワード
   ▼smith さん:
おはようございます。

>フィールド名の表示ができなくなっちゃったけど・・・

  For Cnt = 1 To RS.Fields.Count
    xlSheet.Cells(1, Cnt).Value = RS.Fields(Cnt - 1).Name
  Next

  xlSheet.Range("A2").CopyFromRecordset RS

蛇足ですが…。
218 hits

【5200】Excelへのエキスポート smith 05/6/1(水) 16:01 質問
【5203】Re:Excelへのエキスポート 小僧 05/6/1(水) 17:09 回答
【5205】Re:Excelへのエキスポート smith 05/6/1(水) 18:29 お礼
【5208】Re:Excelへのエキスポート 小僧 05/6/2(木) 8:53 発言
【5220】Re:Excelへのエキスポート smith 05/6/2(木) 17:04 お礼

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