担当者と代表者が同じだった場合、フォーム内に作成したボタンで、コピー貼付けをするような
ものなのですが、エラーが出てしまいます。
Private Sub btn__RepresentativesNameCopy_Click()
If Me.代表者名.Value <> "" Then
Me.担当者名.Value = Me.代表者名.Value
Me.担当者名フリガナ.Value = Me.代表者名フリガナ.Value
Me.Recalc
End If
End Sub
担当者名、契約者名までは反映されるのですが、担当者名フリガナ、代表者名フリガナがエラーになります。
コードを画像で投稿されても誰も再現確認できませんので、テキストでマークダウンにてご提示ください。
また、なるべくコピペで再現できるよう、データについても提示願います。
あと…「何度確認しても」と言われても「要件」や前提、背景が明示されてないので赤の他人からアドバイスは得られにくいかと思います。
具体的に記載してください。質問は編集できます
(抜粋)マークダウンにてご提示ください。
https://teratail.com/help#about-markdown
回答2件
あなたの回答
tips
プレビュー