[[20220915160114]]　『ハイパーリンクでエラー』（ほっほっほ）　ページの最後に飛ぶ

『ハイパーリンクでエラー』（ほっほっほ）

この３行目でハイパーリンクが挿入できず、「実行時エラー 1004 アプリケーション定義またはオブジェクト定義のエラーです。」
が表示されます。
文法ミスでしょうか？

j = 2

    If Cells(j, 7).Value <> "" Then
        Cells(j, 9).Formula = "=https://google.co.jp/maps/dir/" & Cells(j, 6).Value & "/" & Cells(j, 7).Value

＜使用 Excel：Excel2016、使用 OS：Windows10 ＞

 こうだろうか？

    Dim j As Integer

    j = 2
    If Cells(j, 7).Value <> "" Then
        ActiveSheet.Hyperlinks.Add Anchor:=Cells(j, 9), Address:="https://google.co.jp/maps/dir/" & Cells(j, 6).Value & "/" & Cells(j, 7).Value
    End If

（ねむねむ） 2022/09/15(木) 16:23

ありがとうございます。
記述自体が全然違ったのですね。
（ほっほっほ） 2022/09/15(木) 16:33

コメント返信：

[ 一覧(最新更新順) ]

[[20220915160114]] 『ハイパーリンクでエラー』（ほっほっほ） ページの最後に飛ぶ

[[20220915160114]]　『ハイパーリンクでエラー』（ほっほっほ）　ページの最後に飛ぶ