[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『ファイルへの書き込みができません』(まいん)
エクセル初心者です。
エクセルでA1からA2に書き込まれているデーターを"UTF-8"でファイルに書き出すマクロを組んでいるのですが、何故か←部分で"ファイルへの書き込みができません"というエラーになってしまいます。どなたかアドバイスをいただけないでしょうか?宜しくお願いいたします。
Sub ボタン3_Click()
Dim stream As Object Set stream = CreateObject("ADODB.Stream")
stream.Type = 2 stream.Charset = "UTF-8" stream.LineSeparator = -1 stream.Open
Dim i As Integer For i = 1 To 10 stream.WriteText ThisWorkbook.Worksheets("Sheet1").Cells(i, 1).Value, 1 Next i
stream.SaveToFile "C:\sample.txt", 2 ←ここでエラーになる。 stream.Close Set stream = Nothing
End Sub
< 使用 Excel:Office365、使用 OS:Windows10 >
>C:\sample.txt Windows10だと通常ユーザーにはCドライブ直下へのファイルの書き込み権がないが 書き込み権を設定してあるのだろうか? ないままであればCドライブ直下ではなくフォルダ内に保存するようにしてはどうか? (ねむねむ) 2019/06/18(火) 15:38
(1)マクロ入りブックのファイルを右クリックし、「ショートカットの作成」を実行します。
(2)できたショートカットを右クリックし、「プロパティ」−「ショートカット」−「リンク先」を編集し、ブック名の前にExcelのプルパスを追記します。
(3)「ショートカット」−「詳細設定」が押せるようになるので、「管理者として実行」にチェックを入れれます。
(4)ショートカットをダブルクリックして実行します。
(???) 2019/06/18(火) 17:09
初心者だとこんな簡単なことが分からなくて。。。。。
頑張ってもっと勉強したいと思います。
同もありがとうございました。
(まいん) 2019/06/19(水) 12:18
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.