これは私の最初のVBAプロジェクトです。以下のコードを使用して、「テンプレート」ワークシートをコピーし、A5から始まる「マスター」ワークシートのセルに基づいて名前を変更し、新しく作成したワークシートにセル値をコピーします。VBAハイパーリンクを使用したシートの作成
ワークシートを作成するのに今まで動作しています。ワークシートを作成するときに "マスター"からハイパーリンクを追加してA5の値を "243"とします「243」のワークシートに。私はいくつかの方法を試してみたが、それは仕事を得ることができませんでした。
が&ハッピーニューイヤーありがとう!
Sub AutoAddSheet()
Dim MyCell As Range, MyRange As Range
Set MyRange = Sheets("Master").Range("A5")
Set MyRange = Range(MyRange, MyRange.End(xlDown))
Application.ScreenUpdating = False
For Each MyCell In MyRange
Sheets("Template").Copy After:=Sheets(Sheets.Count)
With Sheets(Sheets.Count)
.Name = MyCell.Value
.Cells(2, 1) = MyCell.Value
End With
Next MyCell
Application.ScreenUpdating = True
End Sub
ようこそ。:) ** 1)**あなたはここで2つの質問をしました。一度に1つの質問に固執するのが一番です。だれでもそのように簡単です。あなたはこの質問を編集して、ハイパーリンクについて新しいものを投稿することができます(そしてより詳細な情報を提供してください)。** 2)** *しかし、「マスター」に別の列を追加すると、重複を確認しない* - より具体的にしてください。問題があなたのコードから何であるかははっきりしていません。 –