実行するとダミーデータを表示させるようにしていますが、ダミーデータを表示
する段階で「型が一致しない」というエラーで困っています。型はLong型でいい
はずなんですが、どう解決したらよいかわかりません・・・。
"PG"、などの"",の部分が問題で最初の1行目の"PG",を「DummyPlayerPosition(0, 1)」
に変えてみても駄目なんです。
どうか教えてください。よろしくお願いします。

'標準モジュール内
Private Sub Main()

setDummyData

'ダミーデータの表示。
Public Sub setDummyData()

setDummyData_Player .Player(1), 4, "PG", DummyPlayerName(0, 1), True
setDummyData_Player .Player(2), 5, "SG", DummyPlayerName(0, 2), False
setDummyData_Player .Player(3), 6, "GF", DummyPlayerName(0, 3), True
setDummyData_Player .Player(4), 7, "SF", DummyPlayerName(0, 4), True
setDummyData_Player .Player(5), 8, "PF", DummyPlayerName(0, 5), False
setDummyData_Player .Player(6), 9, "FC", DummyPlayerName(0, 6), True, True
setDummyData_Player .Player(7), 10, "C", DummyPlayerName(0, 7), False


'ダミーデータの選手のコード'
Private Sub setDummyData_Player(ByVal Player As Player, _
                                ByVal UniformNumber As Long, _
                                ByVal Position As Long, _
                                ByVal Name As String, _
                                ByVal IsStartingMember As Boolean, _
                                Optional ByVal IsCaptain As Boolean = False)
    With Player
        .UniformNumber = UniformNumber
        .Position = Position
        .Name = Name
        .IsStartingMember = IsStartingMember
        .IsCaptain = IsCaptain
    End With
End Sub

'ダミーデータのDummyPlayerPosition'
Public Function DummyPlayerPosition(ByVal TeamIndex As Long, ByVal PlayerIndex As Long)
    'Aの場合'
    If TeamIndex = 0 Then
        DummyPlayerPosition = Choose(PlayerIndex, "PG", "SG", "GF", "SF", "PF", "CF", "C", "PG", "SG", "GF", "SF", "PF", "CF", "C", "PG", "SG", "GF", "SF")
    'Bの場合'
    Else
        DummyPlayerPosition = Choose(PlayerIndex, "PG", "SG", "GF", "SF", "PF", "CF", "C", "PG", "SG", "GF", "SF", "PF", "CF", "C", "PG", "SG", "GF", "SF")
    End If
End Function

> する段階で「型が一致しない」というエラーで困っています。型はLong型でいい
> はずなんですが、どう解決したらよいかわかりません・・・。
> "PG"、などの"",の部分が問題で最初の1行目の"PG",を「DummyPlayerPosition(0, 1)」
> に変えてみても駄目なんです。

プロシージャ setDummyData_Player の引数 Position が定義では Long 型ですが、呼び出し側では
文字列を渡しているからでしょう。
DummyPlayerPosition の返り値も文字列ですから、これを呼び出した処で何も解決しません。

Long 型を渡すのが正しいなら文字列ではなく数値を渡すようにするか、"PG" 等の文字
列を渡すのが正しいなら、setDummyData_Player を変更するか、でしょう。

Geo-TK3さん、回答ありがとうございます。
データ型をStringに変更することで解決しました。
昨夜、データ型の変更を1度は試したものの関係ある箇所をすべて変更
していなかったため実現できませんでした・・・。
本当にありがとうございました。