Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
808to812
808to812
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Visual Basic nimmt Formel nicht an?

Forumthread: Visual Basic nimmt Formel nicht an?

Visual Basic nimmt Formel nicht an?
06.10.2006 15:06:15
Sonnenpeter
Hallo zusammen,
Visual Basic nimmt die folgende Formel nicht an?:
Range("U3").Value = _
"=""Erfassungszeitraum: ""&TEXT(Feiertage!E" & Zähler2,""TT.MM.JJJJ"")&"" bis ""&TEXT((Feiertage!E" & Zähler2,""TT.MM.JJJJ"")"
Die folgende Formel wird jedoch problemlos angenommen:
Range("P8").Value = "=Feiertage!F" & Zähler1
Ich mutmasse das es am "," liegt.
Der Recorder zeichnet folgendes auf:
Range("U3").Value = _
"=""Erfassungszeitraum: ""&TEXT(Feiertage!R[-1]C[-16],""TT.MM.JJJJ"")&"" bis ""&TEXT(Feiertage!R[3]C[-16],""TT.MM.JJJJ"")"
Was kann ich tun?
Gruß Sonnenpeter
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Visual Basic nimmt Formel nicht an?
06.10.2006 15:24:21
Reinhard
Hi Peter,
Range("U3").FormulaLocal="=...."
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
FormulaLocal wird auch nict angenommen
06.10.2006 17:19:22
Sonnenpeter
Hallo Reinhard,
die Formel:
Range("U3").Range("U3").FormulaLocal = _
"=""Erfassungszeitraum: ""&TEXT(Feiertage!E" & Zähler2 & ,""TT.MM.JJJJ"")&"" bis ""&TEXT(Feiertage!R[3]C[-16],""TT.MM.JJJJ"")"
Wird auch nicht angenommen :-(
Gruß Peter
Anzeige
AW: Visual Basic nimmt Formel nicht an?
06.10.2006 18:31:46
Erich
Hallo Peter,
mit .Value würde ich (der Klarheit halber) keine Formeln in eine Tabelle schreiben,
auch wenns geht.
Das sollte alles funzen: 
Sub tst()
Dim Zähler1 As Long, Zähler2 As Long
Zähler1 = 1
Zähler2 = 2
Range("A3").Value = _
"=""Erfassungszeitraum: ""&TEXT(Feiertage!E" & Zähler1 & _
",""TT.MM.JJJJ"")&"" bis ""&TEXT(Feiertage!E" & Zähler2 & ",""TT.MM.JJJJ"")"
Range("A4").Formula = _
"=""Erfassungszeitraum: ""&TEXT(Feiertage!E" & Zähler1 & _
",""TT.MM.JJJJ"")&"" bis ""&TEXT(Feiertage!E" & Zähler2 & ",""TT.MM.JJJJ"")"
Range("A5").FormulaLocal = _
"=""Erfassungszeitraum: ""&TEXT(Feiertage!E" & Zähler1 & _
";""TT.MM.JJJJ"")&"" bis ""&TEXT(Feiertage!E" & Zähler2 & ";""TT.MM.JJJJ"")"
Range("A6").FormulaR1C1 = _
"=""Erfassungszeitraum: ""&TEXT(Feiertage!R" & Zähler1 & _
"C5,""TT.MM.JJJJ"")&"" bis ""&TEXT(Feiertage!R" & Zähler2 & "C5,""TT.MM.JJJJ"")"
Range("A7").FormulaR1C1Local = _
"=""Erfassungszeitraum: ""&TEXT(Feiertage!Z" & Zähler1 & _
"S5;""TT.MM.JJJJ"")&"" bis ""&TEXT(Feiertage!Z" & Zähler2 & "S5;""TT.MM.JJJJ"")"
End Sub
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
Danke ..................................
07.10.2006 11:40:00
Sonnenpeter
Hallo Erich,
Danke für die Hilfe! :-)))
Gruß Sonnenpeter
AW: Visual Basic nimmt Formel nicht an?
06.10.2006 18:39:39
HaHoBe
Hallo, Sonnenpeter,
einen Text würde ich immer ohne das beginnende Gleichheitszeichen als Wert einfügen:
Range("U3").Value = _
"Erfassungszeitraum: " & Sheets("Feiertage").Range("E" & zähler2).Text & " bis " & Sheets("Feiertage").Range("E" & zähler2 + 5).Text

Ciao,
Holger
Anzeige
Auch Dir ein Danke....................
07.10.2006 11:44:55
Sonnenpeter
Hallo Holger,
auch Dir ein Danke für die Unterstützung.
Gleichheitszeichen muß sein, da die Bezüge Variable sind.
Grüße aus Rheinhessen, Sonnenpeter
;

Forumthreads zu verwandten Themen

Format(etwas, "sonstwas") wird nicht erkannt
Mike

Hallo zusammen,
in einigen VBA-Projekten wird "Format" nicht erkannt. Meldung: "Fehler beim kompilieren, Falsche Anzahl an Argumenten oder Zuweisung einer Eigenschaft"
Öffne ich im gleichen VB-Editor eine neue Mappe/Projekt funktioniert es für die neue Mappe nicht aber für besagte alte...
20.08.2008 11:13:00
Thread-ID: 1003138
16 Beiträge
Code wird nicht richtig erkannt
Reinhard

Hallo Wissende,
wegen einer Anfrage hier (irgendwas mit Lottozahlen) habe ich mir
https://www.herber.de/bbs/user/55214.xls
heruntergeladen.
In Blatt1 steht Zeilenweise der nachstehende Code, den habe ich in den VB-Editor in einem Modul eingefügt.
Die Zeilen
Sub Lotto_...
06.09.2008 19:00:21
Thread-ID: 1007881
8 Beiträge
Listenfeld als Zahl formatieren
Bernhard

Hallo meine Freunde,
ich habe noch eine Aufgabe. In meiner UF habe ich Textfelder, in die Preise eingetragen werden. Wie kann ich diese Textfelder in Zahlen formatieren?
Danke für Eure Hilfe
Gruss
Bernhard
09.09.2008 12:36:36
Thread-ID: 1008416
7 Beiträge
Anzeige
Teilergebnis einer Spalte wird nicht angezeigt
thaake

Hallo,
ich lasse mir die Teilergebnisse verschiedener Spalten anzeigen mit =Teilergebnis(9;V5:V300), was auch überall klappt, aber nur eine Spalte weigert sich. Formatierung ist vollkommen ok, das Anzeigen in einer anderen Zelle mit Verweis auf diese Spalte klappt auch nicht. Summe dagegen...
22.09.2008 11:21:12
Thread-ID: 1011416
2 Beiträge
Inhalt von UF wird nicht angezeigt
UF

Hi Forum,
ich starte meine UF mit dem folgenden Code:
Sub auto_open() Application.WindowState = xlMinimized UF_BitteWarten.Show vbModeless Application.Run "RESETMASK" UF_BitteWarten.Hide UF_Maske.Show End Sub
Wie zu erkennen, wird beim Start ein Reset ausgeführt, der einige Sekun...
26.09.2008 14:29:02
Thread-ID: 1012639
16 Beiträge
Textbox Ausgabe als Zahl bzw. Zeit formatieren
Steffan

Hallo ihr lieben,
ich schreib jetzt schon den ganzen Tag an folgender Routine:
Private Sub CommandButton1_Click() Dim z As Integer z = Range("I101").End(xlUp).Row + 1 TextBox1 = Format(CDate(TextBox1.Value), "dd.mm.yyyy") Cells(z, 9) = TextBox1 'Datum des Tauchgangs Cells(z, 12) = Tex...
28.09.2008 20:12:56
Thread-ID: 1012988
6 Beiträge
Filterergebnisse werden nicht angezeigt
hajo


Hallo zusammen,
wenn ich mit Autofilter einen Filter in VBA setze, wird mir das Ergebnis nicht angezeigt. Wenn ich die gleiche Aktion manuell ausführe bekomme ich das gewünschte Ergbniss. Kann mir jemand helfen?
Range("A1").Select
Selection.AutoFilter
Selection.AutoFilter F...
29.10.2008 12:43:42
Thread-ID: 1020236
5 Beiträge
Rechtschreibung: Pop-Up wird nicht mehr angezeigt
Norbert

Hallo,
nach dem Auswählen des Menüpunktes "Extras" - "Rechtschreibung", wird das zugehörige Pop-Up zur Auswahl der Korrekturvorschläge nicht mehr angezeigt.
Nach einem Klick auf die Schaltfläche "Rechtschreibung" ebenfalls nicht mehr.
Ich habe die möglichen Optionen zur Einstellung...
11.11.2008 11:22:22
Thread-ID: 1023480
3 Beiträge
langer Text wird nicht mehr angezeigt
u_hoernchen

Ich muss einen langen Text (ca. 1.500 Zeichen) in eine Excel-Zelle schreiben (geht leider nicht anders, also das bitte nicht in Frage stellen). Nun wird beim Ausdruck und bei der Bildschirmanzeige aber die letzte Zeile nicht mehr umgebrochen (Zeilenumbruch ist formatiert), in der Zelle steht ab...
05.01.2009 11:10:25
Thread-ID: 1036916
4 Beiträge
Wenn Links keine Zahl - MsgBox
Heinz

Leute ich habe bitte noch ein Problem
Mit unteren Code werden Werte (Zahlen) verschoben.
Nun möchte ich bitte wenn in " Range("F65") = Left(wks.Range("C5").Value, 5) " keine 5 Zahlen stehen, das dann eine MsgBox erscheint "Linie 311 keine gültige SAP Nummer".
Ist das mit diesen unte...
02.02.2009 20:00:18
Thread-ID: 1046400
3 Beiträge
Anzeige
Zelleninhalt wird bei Wenn-Abfrage nicht erkannt
CheHerbers

Hey,
ich habe eine Wenn-Abfrage, die prüfen soll, ob A1kleinerA2.
In A1 und A2 stehen jeweils Datum mit Uhrzeit.
A1 = 17.02.2009 10:42:35
A2 = 17.02.2009 10:43:57
A1 fülle ich über ein Makro.
Code:
Sheets("Daten").Range("A1") = ComboBox1.Value & " " &...
18.02.2009 10:35:00
Thread-ID: 1051714
4 Beiträge
Formel wird nicht ausgeführt
Andy

Hallo Leute,
Guten Abend. Ich habe ein ganz großes Problem.
Ich habe eine Exceldatei mit vielen Datensätzen (ca. 8000). In Spalte C habe ich eine Formel, die auf Spalte A und B Bezug nimmt und aus einer Matrix den entsprechenden Wert sucht. Das ganze hat bis jetzt super funktioniert. W...
19.02.2009 16:47:00
Thread-ID: 1052226
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige