Excel VBA 質問スレッド №1995 (解決済)

請求書+A2のセル値+日付で保存

投稿者 : クロまめ     投稿日時 : 2024/08/20(Tue) 14:45:18     OS : 未指定     EXCEL : 未指定
請求書+A2のセル値+日付で保存 をしたいのですがエラーが出てしまいます。
ご教示いただけますでしょうか。



    Application.DisplayAlerts = False
Set objNa = CreateObject("WScript.Network")
strCa = objNa.UserName
Filename = "請求書" + Range("A2") + Format(Date, "mmdd")
ActiveWorkbook.SaveAs Filename:="C:\Users\" & strCa & "\Desktop\" & Filename, FileFormat:= _
xlOpenXMLWorkbook, CreateBackup:=False
Application.DisplayAlerts = True

スポンサーリンク
[返信 1] Re : 請求書+A2のセル値+日付で保存
投稿者 : さんこう     投稿日時 : 2024/08/20(Tue) 15:02:41
>エラーが出てしまいます。

試してみましたが、問題なく保存できました。

どの行で、どんなエラーが出るのでしょうか?

[返信 2] Re : 請求書+A2のセル値+日付で保存
投稿者 : クロまめ     投稿日時 : 2024/08/20(Tue) 15:21:45
■[返信 1] さんこうさん(2024-08-20 15:02:41)の記事
> >エラーが出てしまいます。

> 試してみましたが、問題なく保存できました。

> どの行で、どんなエラーが出るのでしょうか?


ご返答ありがとうございます。

Filename = "注文アップロードフォーマット" + Range("A2") + Format(Date, "mmdd")
↑ここで
実行時エラー'13' 型が一致しませんと表示され止まってしまいます。

[返信 3] Re : 請求書+A2のセル値+日付で保存
投稿者 : クロまめ     投稿日時 : 2024/08/20(Tue) 15:28:22
申し訳ございません、勘違いしているところがあり、無事実行できました!

当掲示板について
  • Excel VBA に関する掲示板です。Excel VBA に関する質問や疑問、それに対する解決方法など気軽に投稿してください。
  • 記事内ではHTMLのタグは使用できません。
  • 記事は一度投稿すると修正できません。内容を訂正したい場合は返信で対応してください。
  • Sub〜End Sub、Function〜End Function は自動的にプログラムコードとみなし、枠で囲って見やすくします。
  • Excel VBA とは関係ないことや、他人が不快に思うようなことなど、管理人が適当でないと判断した記事は削除する場合があります。
スポンサーリンク
返信入力フォーム
お 名 前  :
内  容   :

ステータス  :

認証コード  : キャプチャ画像 




( 処理日時 : 2025-07-14 19:46:37 )
タイトルとURLをコピーしました