Vba- Verschiebung
14.01.2021 16:11:34
KMosar
Ich muss in einem Vba- Programmcode ein Formular ausfüllen lassen.
Vorab ein paar Information: Ich habe ein Formular und 5 Messplätze.
Je nachdem welchen Messplatz ich aussuche, bekomme ich unterschiedliche Werte.
Ich habe es irgend wie geschafft ein kleines Programm zu schreiben.
Leider sieht es bei mir, wenn ich das Makros ausführe und die nicht benötigten Tabellen gelöscht werden, nicht mehr schön aus.
Die Tabellen verschieben sich und wenn ich es drucken möchte sind die Tabellen alle versetzt.
Gibt es eine Möglichkeit wie ich es hinbekomme, dass die Tabellen sich nicht verschieben
Ein Teil von meinem Programm :
If Geraet = "bb22" Or Geraet = "BB22" Or Geraet = "Bb22" Then
aequivbez = MsgBox("Sollen die Werte für das Gerät BB22 eingesetzt werde?", vbYesNo, "Schalter")
End if
If aequivbez = vbYes Then
Worksheets(2).Range("C114:C121").Value = Worksheets(va).Range("B125:B132").Value
Worksheets(2).Range("D114:D121").Value = Worksheets(va).Range("D125:D132").Value
'Else
' Range("A11:L125").Delete shift:=xlUp
End If