Thema Datum  Von Nutzer Rating
Antwort
Rot  Worksheets.Text Problem
 27.05.2022 20:06:20 Claus
NotSolved
27.05.2022 20:18:55 Gast01233
NotSolved
27.05.2022 20:58:09 ralf_b
NotSolved
27.05.2022 21:29:23 Gast40416
NotSolved

Ansicht des Beitrags:
Von:
Claus		 Datum:
27.05.2022 20:06:20		 Views:
975		 Rating:
     
Antwort:
  Ja
Thema:
Worksheets.Text Problem

Hallo zusammen,

hier habe ich ein Problem, welches ich mir nicht erklären kann.

Ursprünglicher Quellcode Auszug:

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
For Each cb In Me.Controls
      If TypeName(cb) = "ComboBox" Then
      z = 1 ' Hinweis: FC 380 ListenIndex: Es muss der Zelleneintrag immer gesetzt werden hier geht der Eintrag ab Zelle A3 los
      s = 1
       
      While Worksheets("Speisen_mit_Preisen").Cells(z, s) <> "" And _
                       cb.Tag <> Worksheets("Speisen_mit_Preisen").Cells(z, s) '*hier bei beiden Speisen_mit_Preisen machen
            s = s + 1
      Wend
      z = 2 'Hinweis: FC 380 ListenIndex: Es muss der Zelleneintrag immer gesetzt werden hier geht der Eintrag ab Zelle A3 los
       
      While Worksheets("Speisen_mit_Preisen").Cells(z, s) <> ""
                       cb.AddItem Worksheets("Speisen_mit_Preisen").Cells(z, s) _
                       & vbTab & Worksheets("Speisen_mit_Preisen").Cells(z, s + 1)<strong>.text</strong> '* Damit alle Eingabe der CB passen immer das neue Tabellenblatt mit Preisen nutzen
                  z = z + 1
      Wend
      cb.ListIndex = 0
      End If
Next
       
Me.txt_Datum_Zeit = Format(Now, "dd-mm-yy hh:mm")

Warum wird hier (in Fett) .text immer automatisch klein geschrieben, obwohl ich .Text eingebe?

Woran liegt das & wie kann man dieses Problem beheben?

 

Vielen Dank an alle die Tipps für mich haben.

FG

Claus

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:
WYSIWYG-Editor, ctl00_Content_editor1



  • 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  Worksheets.Text Problem
 27.05.2022 20:06:20 Claus
NotSolved
27.05.2022 20:18:55 Gast01233
NotSolved
27.05.2022 20:58:09 ralf_b
NotSolved
27.05.2022 21:29:23 Gast40416
NotSolved