Microsoft Access 掲示板

表をアクセスに取り込みたい / 17

17 コメント
views
4 フォロー
17
セロハン 2020/10/26 (月) 15:42:48 0029a@1c915

ごめんなさい…
VBAに間違いがあります。修正します。

Private Sub btn取込_Click()
    Dim 取り込みデータ As String
    If IsNull(Me.txtデータ) Then
    MsgBox "テキストボックスが空です。"
    Else
    取り込みデータ = Me.txtデータ
    取り込みデータ = Replace(取り込みデータ, vbCrLf, vbTab)
        Call AddData2(Me.txtテーブル名, 取り込みデータ, 列数)
    End If

通報 ...