Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
452to456
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
452to456
452to456
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Anfängerfrage

VBA Anfängerfrage
09.07.2004 09:03:48
Horst
Hallo,
mit folgender Anweisung setze ich den Bereich auf ein Tabellenblatt im geöffneten Excel Blatt

Set rng = Sheets("erledigte Aufträge").Cells(Rows.Count, CInt(2)).End
Was muss ich machen, wenn ich den Verweis auf eine andere Excel Anweisung setzen will.
Vielen Dank im Voraus
Gruß Horst

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Anfängerfrage
09.07.2004 09:36:01
Matthias
Hallo Horst,
Was muss ich machen, wenn ich den Verweis auf eine andere Excel Anweisung setzen will.

Was meinst Du damit?
Gruß Matthias
AW: VBA Anfängerfrage
09.07.2004 09:57:05
Horst
Hallo,
im Prinzip möchte ich nur Daten aus einer Excel Mappe in eine andere Mappe übertragen.
Innerhal einer Mappe funktioniert alles, aber ich krieg das nicht hin, wenn es in eine
andere Mappe gehen soll.
Danke im Voraus
Horst
komisch
ExceL
hi
ich habe keine Erklärung dafür (im Moment)
mit kommstellen funzt es

Private Sub TextBox1_Change()
Range("a1").Value = TextBox1.Text
Range("a1").NumberFormat = "#,##0.00"
End Sub



Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Text = Format(TextBox1.Text, "#,##0.00")
End Sub

das könnte ich im moment anbieten
schaue mich aber nach einer anderen Lösung um!
Gruß
Christian
Anzeige
frag nicht warum :-)
ExceL
hi
so geht es

Private Sub TextBox1_Change()
Range("a1").NumberFormat = "#,##0"
Range("a1").Value = TextBox1.Text
If Len(TextBox1.Text) < 7 And Len(TextBox1.Text) > 3 Then Range("a1").Value = Range("a1").Value * 1000
End Sub



Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Text = Format(TextBox1.Text, "#,##0")
End Sub

gruß
christian
falschen Thread erwischt? - o.T.
09.07.2004 10:24:42
Matthias
:-)
:-) tja würde sagen ja __ot
ExceL
AW: ich frag auch nicht warum :-) o.T.
09.07.2004 10:46:01
Matthias
-
!!!!! sorry falscher Thread!!!!!!__ot
ExceL
AW: VBA Anfängerfrage
09.07.2004 10:17:56
Matthias
Hallo Horst,

Sub test()
Workbooks("Test.xls").Sheets("Tabelle1").Range("D1") = Sheets("Tabelle2").Range("A1")
End Sub

Kopiert den Inhalt der akt. Mappe, Tabelle2, Zelle A1 nach Test.xls
Gruß Matthias
Anzeige

Links zu Excel-Dialogen

TextBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige