Datenbanken: MODELLBAHN VERWALTUNG SYSTEM MVS

Zitat von Heitersberg

Du kannst dich sicher noch erinnern, dass ich das nie hinbekommen habe. Deshalb arbeite ich z.Zt. mit zwei separaten Listen Und das Ziel wäre eben, diese in einem anderen Programm zusammenzufügen. Bin nun gerade wieder daran MobaVer genauer zu studieren, es wird langsam klarer. Und wegen dem Import werde ich, wenn es soweit ist und ich es nicht hinkriege mit Rolf Kontakt aufnehmen.

Hi Jürg
Ich denke, Rolf kann Dich da kompetent uinterstützen!

Lg
Giorgio

Zitat von respace99

Ist nur eine Variable, die geändert werden muss - nicht jeder hat so eine grosse Sammlung wie Jürg

Lg
Giorgio

Ist das einfach diese hier:

Const LastUsedRowRange = "D998"

Public Const ScrollArea_OverView = "A1:AK1000"

Public Const ScrollArea_DetailView = "A1:M54"

Public Const Browser = "IEXPLORE.EXE"

'Public Const Browser = "FIREFOX.EXE"

'Public Const Browser = "OPERA.EXE"

Zitat von MAB

Ist das einfach diese hier:

Const LastUsedRowRange = "D998"

Public Const ScrollArea_OverView = "A1:AK1000"

Public Const ScrollArea_DetailView = "A1:M54"

Public Const Browser = "IEXPLORE.EXE"

'Public Const Browser = "FIREFOX.EXE"

'Public Const Browser = "OPERA.EXE"

Alles anzeigen

Hi Mario

Hab mal nachgesehen - es sind mehrere Stellen, an welchen aktuell 998 oder 1000 stehen wird - dort den Wert erhöhen (immer an einer Kopie!!) - bei mir stehen dort aktuell diese Werte (OK, ich habe schon einige Erweiterungen eingebaut):

• Public Const ScrollArea_OverView = "A1:BB2000"
• LastUsedRow = Sheets(OverView).Range("R3100").End(xlUp).Row
• Sheets(OverView).Names.Add Name:="ZugSelection", RefersTo:="=$R$3001:$R$" & LastUsedRow
• For x = 3002 To LastUsedRow

Danke für den Hinweis. Ich probiere das gerne mal aus - natürlich an einer Kopie