Thema Datum  Von Nutzer Rating
Antwort
Rot Input aus Userform ändert ungewollt die Formatierung der "Zielzelle"
01.03.2016 16:08:48 Stefan
NotSolved
01.03.2016 16:45:40 Gast44508
NotSolved
01.03.2016 16:49:44 Gast44508
NotSolved
01.03.2016 17:01:35 Gast1920
NotSolved
01.03.2016 17:18:36 Gast44508
NotSolved
01.03.2016 17:24:08 Stefan
NotSolved
02.03.2016 09:54:40 Stefan
NotSolved

Ansicht des Beitrags:
Von:
Stefan
Datum:
01.03.2016 16:08:48
Views:
2076
Rating: Antwort:
  Ja
Thema:
Input aus Userform ändert ungewollt die Formatierung der "Zielzelle"

Schönen guten Tag,

ersteinmal ein Kompliment an das Forum hier - gefällt mir wirklich sehr gut...

Vorweg: ich bin noch relativ neu in der VBA-Welt und möchte gleich vorweg um etwas Geduld bitten...

Die Rahmeninfos: ich benutze EXCEL 2010 auf einem englischsprachigen OS.

Zu meinem Problem: ich habe eine Userform erstellt, die unter anderem die Eingabe einer Prozentzahl ermöglichen soll - und zwar für die User "ganz einfach" beispielsweise als "87,45%", ohne sich weiter Gedanken machen zu müssen.

Ich schaffe es, alle Informationen in die Zielzelle zu bekommen, allerdings scheint der Input der Userform deren Formatierung zu verändern. Nachdem der Input aus der Form dort "gelandet" ist, erkennt EXCEL den Wert nicht mehr: weder in den "Cond.formatting" Regeln, noch in Charts, oder in anderen Formeln.

Ich habe getestet was passiert wenn ich die Formatierung per Hand auf (bei mir in der EN Version) "General" umstelle und mit F2 bestätige (hatte ich gelesen) - und es schein das Problem zu beheben.

Ich denke deshalb, dass ich im VBA Code der Form etwas verhauen habe....?

Hier der Code des "SAVE Buttons". Dabei ist "Reg.2" der Name der fraglichen Textbox...

 

Private Sub cmdSaveData_Click()
Dim cNum As Integer
Dim X As Integer
Dim nextrow As Range
Dim sht As String
sht = ComboBox1.Value
If Me.ComboBox1.Value = "" Then
    MsgBox "Please select a months from the combobox"
    Exit Sub
End If
    Sheets(sht).Range("Z52") = Reg1.Value
    Sheets(sht).Range("Z54") = Reg2.Value
    
MsgBox "The data has been saved"
Unload Me
End Sub

LG,
Stefan


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
Rot Input aus Userform ändert ungewollt die Formatierung der "Zielzelle"
01.03.2016 16:08:48 Stefan
NotSolved
01.03.2016 16:45:40 Gast44508
NotSolved
01.03.2016 16:49:44 Gast44508
NotSolved
01.03.2016 17:01:35 Gast1920
NotSolved
01.03.2016 17:18:36 Gast44508
NotSolved
01.03.2016 17:24:08 Stefan
NotSolved
02.03.2016 09:54:40 Stefan
NotSolved