|
Hallo,
ich brauch Hilfe bei folgendem:
Ich habe ein Vba Code geschrieben ( wenig Vba Kenntnisse) für ein Formular welches Daten von dem einen Blatt in das anderen kopiert.
If Geraet = "BB22" Or Geraet = "bb22" Or Geraet = "Bb22" Then
aequivbez = MsgBox("Sollen die Werte für das Kraftpegel eingesetzt werde?", vbYesNo, "Flaschen")
f aequivbez = vbYes Then
Worksheets(2).Range("C114:C121").Value = Worksheets(va).Range("B125:B132").Value
Else
Range("A11:L125").Delete shift:=xlUp
End if
Davon habe ich jetzt mehrere Abfragen
Leider habe ich das Problem, dass die Tabellen nach oben verschoben und teilweise geteilt (im Seitenlayout) werden.
Was kann ich dagegen unternehmen?
Also es soll trotzdem schön aussehen und immer passend auf die Seite.
|