[[20061107151812]] 『2つのセルの値をシート名に』(マクロ初心者) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『2つのセルの値をシート名に』(マクロ初心者)
 A1にお客さま名 B1に連番が有ります。その値を取得しシートの名前にしたいのです。
 例 A1      B1
   AAA商店  0001
 シート名 AAA商店0001です。よろしくお願い致します。

 シート名とはどのシートでしょうか?
 (Matta)

 サンプルです。
 Sub Test()
 Dim myAns As String
 With Worksheets("Sheet1")
    myAns = .Range("A1").Value & .Range("B1").Value
    MsgBox myAns
 End With
 End Sub

説明不足ですいません。D:に請求書フォルダに名前を付けて保存したいのです。
次のコードでA1の名前は取得できるのですが・・・
ActiveWorkbook.SaveAs _
    Filename:="D:\請求書\2006.11\" & Range("A1")

 これでいいのかな?
 (Matta)
 ActiveWorkbook.SaveAs _
    Filename:="D:\請求書\2006.11\" & Range("A1").Value & Range("B1").Value & ".xls"

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.