Access2021 「演算子がありません」エラー

実現したいこと

商品の一覧が表示されている商品フォームの商品IDをダブルクリックすることで別のフォームを開くこと

発生している問題・分からないこと

検索フォーム側である商品フォームの商品IDのダブルクリック時イベントに対しイベントプロシージャを設定することで、
別フォームである詳細フォームが開くはずなのですがダブルクリックすると実行時エラーが表示されます。

商品IDはテキスト型で数値型で試したところ開くことができました。
しかし、テキスト型の場合エラーが発生します。
初心者で大変申し訳わけないのですが、テキスト型のままエラーが出ない方法をご教授のほどお願い致します。

エラーメッセージ

error
1実行時エラー　3075
2クエリ式  'C-1' の構文エラー :演算子がありません。
3

該当のソースコード

イベントプロシージャのコード
Private Sub 型番_DblClick(Cancel As Integer)

If Me!商品ID >= 1 Then

    DoCmd.OpenForm "詳細フォーム", , , "商品ID = " & Me!商品ID
Else

    DoCmd.OpenForm "詳細フォーム", , , , acFormAdd

End If

End Sub

試したこと・調べたこと

teratailやGoogle等で検索した
ソースコードを自分なりに変更した
知人に聞いた
その他

上記の詳細・結果

参考にしたサイト
https://tasukete-access.com/2021/12/13/accessdev_detail/

数値型でダブルクリックした場合、上記のサイト通りに実行することができました。

補足

商品フォーム
商品ID(テキスト型) 商品名(テキスト型)
商品ID C-1 C-2 C-3

詳細フォーム
商品ID(テキスト型) 商品名(テキスト型)　更新日(日付/時刻型)

行動規範の内容に同意します

回答1件

ベストアンサー

商品IDはテキスト型

vba
1Private Sub 型番_DblClick(Cancel As Integer)
2
3    If Nz(Me![商品ID], "") <> "" Then
4        DoCmd.OpenForm FormName:="詳細フォーム", _
5                       WhereCondition:="[商品ID]='" & Replace(Me![商品ID], "'", "''", , , vbBinaryCompare) & "'"
6    Else
7        DoCmd.OpenForm FormName:="詳細フォーム", _
8                       DataMode:=acFormAdd
9    End If
10
11End Sub