Thema Datum  Von Nutzer Rating
Antwort
24.11.2016 08:58:37 Markus
NotSolved
24.11.2016 10:21:37 Mario
NotSolved
Rot Fehler bei Übernahme von Werten
24.11.2016 10:51:02 Gast35145
NotSolved

Ansicht des Beitrags:
Von:
Gast35145
Datum:
24.11.2016 10:51:02
Views:
634
Rating: Antwort:
  Ja
Thema:
Fehler bei Übernahme von Werten
Ich hoffe das klappt. Irgendwie ist der Text nach dem Absenden immer "fortlaufend" :-( Private Sub cmdEingabe_Click() 'Fügt die Werte ein und schließt das Formular frmGeräteeingang Dim intErsteLeereZeile As Long 'Schaltet den Blattschutz aus ActiveSheet.Unprotect With ActiveSheet intErsteLeereZeile = .Cells(Rows.Count, 5).End(xlUp).Row + 1 'Kopieren der Formatierungen/Sverweis aus Zeile 4 Worksheets("Reparaturen").Range("A4:AI4").Copy Worksheets("Reparaturen").Cells(intErsteLeereZeile, 1) 'Festlegung der Formate .Cells(intErsteLeereZeile, 3).Value = CDate(Me.txtDatum.Value) .Cells(intErsteLeereZeile, 2).Value = Me.cboBearbeiter.Value .Cells(intErsteLeereZeile, 1).Value = Me.cboStatus.Value .Cells(intErsteLeereZeile, 4).Value = CDec(Me.txtGeraetenummer.Value) .Cells(intErsteLeereZeile, 7).Value = Me.txtReparaturmeldungGrace.Value End With 'Übernahme des Wertes aus dem SVerweis in Spalte E letzteZelle = ActiveSheet.Cells(Rows.Count, 5).End(xlUp).Row Selection = Selection.Value Unload frmGeraeteeingang 'Schaltet den Blattschutz mit Optionen wieder ein ActiveSheet.Protect , AllowDeletingRows:=True, AllowSorting:=True, AllowFiltering:=True End Sub

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
24.11.2016 08:58:37 Markus
NotSolved
24.11.2016 10:21:37 Mario
NotSolved
Rot Fehler bei Übernahme von Werten
24.11.2016 10:51:02 Gast35145
NotSolved