kun 253 karakterer i en string

Jeg glemte at skrive, at der ikke kommer nogen fejl, hvis man prøver at fylde mere i. Den klipper blot alt efter tegn nummer 251.

I hvilken forbindelse er du stødt på denne begrænsning  ?

sakset fra hjælpen

"En streng med variabel længde kan indeholde op til ca. to milliarder (2^31) tegn."

Prøv at vis hvordan du har dim'met din stringvariabel, og hvordan du fylder tegn i den

Du har vel ikke skrevet dim MyString as String*256, vel ;o)

Dim StrSQL2 As String
   
StrSQL2 = "insert into tabel (a,b,c,d,e,f,..........l,m,n,o)"

StrSQL2 = StrSQL2 & " values(" & Range("A" & i).Value & ""
StrSQL2 = StrSQL2 & ", '" & Range("B" & i).Value & "'"
StrSQL2 = StrSQL2 & ", '" & Range("C" & i).Value & "'"
StrSQL2 = StrSQL2 & ", '" & Range("J" & i).Value & "'"
StrSQL2 = StrSQL2 & ", '" & Range("K" & i).Value & "'"
StrSQL2 = StrSQL2 & ", '" & Range("L" & i).Value & "'"
.
.
.
.
StrSQL2 = StrSQL2 & ", '" & Range("AX" & i).Value & "'"

StrSQL2 = StrSQL2 & ")"

- - - -

Jeg har løst problemet ved at klippe strengen i to. Jeg er dog stadig villig til at give point, da jeg nok skal løbe ind i problemet igen en anden gang.

Lukker