Hi,
könnt ihr mir noch behilfs sein.
ich werde unter die code hinzufügen. Aber was ich möchte, ist, dass ich alle coden in diesen form haben möchte: mit nummiert halt:
[1] Nama= Amiostd01 es soll dinamisch sein
sample ID=0 es soll dinamisch sein
Dilution Factor =0.1 das soll fest sein
sample weight =0.1 auch fest
qnt=corarex
pqm=cordarex
injection volume =20 auch fest
Pos=FE8 auch fest
Hier ist :
filename = „VitD_“ & monat & idformat(zahl + 1)
Print #filenum, „1“ & vbTab & filename & vbTab & vbTab & „CS Ko 1“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + 2)
Print #filenum, „2“ & vbTab & filename & vbTab & vbTab & „CS Ko 1“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + 3)
Print #filenum, „3“ & vbTab & filename & vbTab & vbTab & „CS Ko 1“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + 4)
Print #filenum, „4“ & vbTab & filename & vbTab & vbTab & „CS Ko 2“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + 5)
Print #filenum, „5“ & vbTab & filename & vbTab & vbTab & „Ko 1“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“ & vbTab & concA & vbTab & concB & „1“
filename = „VitD_“ & monat & idformat(zahl + 6)
Print #filenum, „6“ & vbTab & filename & vbTab & vbTab & „Ko 2“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + 7)
Print #filenum, „7“ & vbTab & filename & vbTab & vbTab & „S“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + 8)
Print #filenum, „8“ & vbTab & filename & vbTab & vbTab & „LW“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
For i = 1 To n
filename = „VitD_“ & monat & idformat(zahl + i + 9)
Print #filenum, (i + 9) & vbTab & filename & vbTab & task(i) & vbTab & bc_neu(i) & vbTab & mrm(i) & vbTab & tune(i) & vbTab & inlet(i) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
Next i
filename = „VitD_“ & monat & idformat(zahl + (n + 9 + z))
Print #filenum, (n + 9 + z) & vbTab & filename & vbTab & vbTab & „S1 24.25“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“ & vbTab & vbTab & vbTab & concC
filename = „VitD_“ & monat & idformat(zahl + (n + 10 + z))
Print #filenum, (n + 10 + z) & vbTab & filename & vbTab & vbTab & „S2 24.25“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“ & vbTab & vbTab & vbTab & concD
filename = „VitD_“ & monat & idformat(zahl + (n + 11 + z))
Print #filenum, (n + 11 + z) & vbTab & filename & vbTab & vbTab & „S3 24.25“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“ & vbTab & vbTab & vbTab & concE
filename = „VitD_“ & monat & idformat(zahl + (n + 12 + z))
Print #filenum, (n + 12 + z) & vbTab & filename & vbTab & vbTab & „K1 24.25“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + (n + 13 + z))
Print #filenum, (n + 13 + z) & vbTab & filename & vbTab & vbTab & „K2 24.25“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + (n + 14 + z))
Print #filenum, (n + 14 + z) & vbTab & filename & vbTab & vbTab & „CS Ko 1“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + (n + 15 + z))
Print #filenum, (n + 15 + z) & vbTab & filename & vbTab & vbTab & „CS Ko 2“ & vbTab & mrm(1) & vbTab & tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + (n + 16 + z))
Print #filenum, (n + 16 + z) & vbTab & filename & vbTab & vbTab & „S“ & vbTab & mrm(1) & vbTab & Tool_tune(1) & vbTab & inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
filename = „VitD_“ & monat & idformat(zahl + (n + 17 + z))
Print #filenum, (n + 17 + z) & vbTab & filename & vbTab & vbTab & „K1“ & vbTab & Tool_mrm(1) & vbTab & Tool_tune(1) & vbTab & Tool_inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“ & vbTab & vbTab & vbTab & concF
filename = „VitD_“ & monat & idformat(zahl + (n + 18 + z))
Print #filenum, (n + 18 + z) & vbTab & filename & vbTab & vbTab & „K2“ & vbTab & Tool_mrm(1) & vbTab & Tool_tune(1) & vbTab & Tool_inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“ & vbTab & vbTab & vbTab & concG
filename = „VitD_“ & monat & idformat(zahl + (n + 19 + z))
Print #filenum, (n + 19 + z) & vbTab & filename & vbTab & vbTab & „S“ & vbTab & Tool_mrm(1) & vbTab & Tool_tune(1) & vbTab & Tool_inlet(1) & vbTab & „1:A,1“ & vbTab & „5.000“ & vbTab & „Analyte“
Close #filenum
zahl = zahl + n + 19 + z 'Inkrement um die Gesamtprobenanzahl angehoben
'schreiben des Inifiles
filenum = FreeFile()
Open ini_dat For Output As #filenum
Print #filenum, zahl & „;“ & monat
Close #filenum