Herbers Excel-Forum - das Archiv

Inhalt aus 4 Zellen in and. Tab. übernehmen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:


Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Inhalt aus 4 Zellen in and. Tab. übernehmen
von: Nancy


Geschrieben am: 24.05.2002 - 09:12:47

Hallo!
Wie kann ich den Inhalt aus 4 Zellen von Tabelle A (E7,E10,L7,L10) in Tabelle B mittels eines CommandButtons übernehmen?
In Tabelle B sollen die Werte in Spalte B,C,D und E in die nächste freie Zeile (natürlich nebeneinander) geschrieben werden.
UND... in Spalte A soll dann die nächstmögliche Nr. vergeben werden die mit einem P anfangen muss (z.B. P1032).

Hoffe das war halbwegs verständlich und irgendwer kann mir helfen :-)

Danke!
Gruss Nancy

nach oben   nach unten

Re: Inhalt aus 4 Zellen in and. Tab. übernehmen
von: Timo

Geschrieben am: 24.05.2002 - 09:33:31

Hi Nancy!

Teste folgendes:

Jetzt schreibst du nur noch
Call Test
in das OnClick-Event des Buttons und das Teil läuft!

Gruss
Timo


nach oben   nach unten

Re: Inhalt aus 4 Zellen in and. Tab. übernehmen
von: Monika Weber


Geschrieben am: 24.05.2002 - 09:43:51

Hallo Nancy

Hier ein Lösungsansatz:

Ich hoffe, dass dir das weiterhilft.
Es liebs Grüessli aus der Schweiz
Monika


www.jumper.ch
*** Generell: Bitte kein Crossposting ***



nach oben   nach unten

Re: Inhalt aus 4 Zellen in and. Tab. übernehmen
von: Nancy


Geschrieben am: 24.05.2002 - 09:48:03

Hi Timo!
Danke für deine schnelle Antwort....das hätte ich nieeeee alleine geschafft!!!!!

Funktioniert leider noch nicht so ganz:

Nummer = Mid(ActiveSheet.Cells(Zeile - 1, 1).Value, 1) + 1

...wird angemeckert "Typen unverträglich"....hab leider keine Ahnung wo der Fehler liegt....da ich das was da steht eh überhaupt nicht raffe :-(

Wäre cool wenn du mir nochmal helfen könntest...hat das vielleicht was damit zu tun das die Eingabe der P-Nummern erst in Zeile4 (Tabelle B) beginnt???????

Danke!
Gruss Nancy

nach oben   nach unten

Könnte sein...
von: Timo


Geschrieben am: 24.05.2002 - 09:55:16

Fangen die Daten in Tabelle B alle erst in der 4ten Zeile an? Dann kannst du einfach den Quellcode wie folgt ändern:

For Zeile = 4 To 65536

Bei mir hats funktioniert, meine Testdaten in Tabelle B fingen aber auch in Zeile 1 an!

Gruss
Timo

nach oben   nach unten

ReMonika: Inhalt aus 4 Zellen ...........
von: Nancy


Geschrieben am: 24.05.2002 - 09:57:06

Hi Monika!
Danke auch an dich.....hab deins auch ausprobiert.... der letzte Teil wird leider angemeckert:

Worksheets(2).Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Value _
= "P" & CDbl(Mid(str, 2, 4)) + 1

"Typen unverträglich"

Hab leider GAR KEINE ahnung von vba....daher is Fehlersuchen für mich ziemlich schwer.


Gruss Nancy

nach oben   nach unten

Re: ReMonika: Inhalt aus 4 Zellen ...........
von: Monika Weber


Geschrieben am: 24.05.2002 - 10:08:50

Hallo Nancy

Was hast du denn genau für Werte stehen in der Spalte A in der Tabelle2?

Ich hab mich auf: P1032 gestützt.
Wenn es andere Werte sind (z.B. PA10320) , dann müsste man das entsprechend anpassen.

Es liebs Grüessli
Monika

www.jumper.ch
*** Generell: Bitte kein Crossposting ***



nach oben   nach unten

ReTimo: Könnte sein...
von: Nancy


Geschrieben am: 24.05.2002 - 10:10:47

Hm.........
Habs geändert...angemeckert wird immer noch das gleiche, es werden allerdings schon Zahlen in Tabelle B geschrieben...allerdings nicht so wie ich es will.
Es werden nicht die Zahlen aus den Zellen übernommen....stattdessen schreibt er in Spalte B eine 001 in C eine 2 in D eine 3 und in E eine 4.......das ganze in 6(!) Zeilen untereinander
Spalte A wo P-Nummern erscheinen sollten bleiben leer.

so soll es später (z.B.)erscheinen...mit den Inhalten aus Tabelle A:
P3022 003 102 204 312


Hiiiieeeeeelfeeeeeee!!!!!!!!!! :-(

Gruss Nancy






nach oben   nach unten

Andere Idee!
von: Timo

Geschrieben am: 24.05.2002 - 10:12:19

Wie sehen denn die Zahlen aus, die hinter dem "P" stehen? Das wäre schon wichtig. Eine ganz andere Möglichkeit ist diese:

Dim Nummer As Variant (Integer durch Variant ersetzen)

Gruss
Timo


nach oben   nach unten

ReMonika: Inhalt aus 4 Zellen ...........
von: Nancy


Geschrieben am: 24.05.2002 - 10:14:46

Hi Monika!

In Spalte A stehen Nummern die mit einem P anfangen....also z.B. P1022
P1023
P1024
P1025
...usw.
und wenn der Inhalt aus den genannten Zellen in Tabelle A übernommen wird in Tabelle B (Spalten B bis E) soll in Spalte A die nächste freie P-Nummer vergeben werden.

Gruss Nancy


nach oben   nach unten

Komisch, bei mir klappts
von: Timo


Geschrieben am: 24.05.2002 - 10:16:02

Also, das Problem kann ich nicht nachvollziehen. Wieso 6 Zeilen untereinander? Ich bin von einer Tabelle ausgegangen, die so aussieht:


MS Excel von Timo an Nancy
 ABCDE
1ABCDE
2P0011234
3P0022345
4etcetcetcetcetc


Dann geht das ganze auch. Mehr fällt mir im Moment auch nicht ein...

Timo

nach oben   nach unten

Re: Komisch, bei mir klappts
von: Nancy


Geschrieben am: 24.05.2002 - 10:20:25

Jaaa....genauso sieht es im prinzip ja auch aus.
Aber in Spalte B bis E stehen nicht die Zahlen 1-4 sondern andere Zahlen....immer verschieden die aus Tabelle A übernommen werden sollen.

Er schreibt mir aber immer die Zahlen 1-4 rein....und eine P-Nummer erscheint gar nicht.

Gruss Nancy


nach oben   nach unten

Re: Komisch, bei mir klappts
von: Timo

Geschrieben am: 24.05.2002 - 10:23:46

Kein Wunder ich bin auch ein Horst...

Ersetze mal den Quellcode durch das hier:

Alsoi nicht den kompletten, sondern den Schnippsel. Wenns jetzt nicht geht weiss ich auch nicht weiter...

Timo

nach oben   nach unten

Hier noch mal komplett:
von: Timo
Geschrieben am: 24.05.2002 - 10:25:52

Bin noch nicht so ganz wach, glaube ich :)

nach oben   nach unten

ReTimo: Hier noch mal komplett:
von: Nancy

Geschrieben am: 24.05.2002 - 10:32:56

Cooooooooooool!!!!!!!!!!!!

Es klappt!!!!!!

Ein riesiges fettes DANKE SCHÖN an dich!!!!!!!

(Wochenende is gerettet!!!)

Gruss Nancy

P.S. Na ja...besser noch nicht ganz wach...als gar nix können so wie ich ;-)


nach oben   nach unten

Re: ReMonika: Inhalt aus 4 Zellen ...........
von: Monika Weber


Geschrieben am: 24.05.2002 - 10:35:13

Hallo Nancy

Ja, genau gestützt auf das habe ich den Code aufgebaut.
Bei mir funktioniert's einwandfrei.

Sind den in Tabelle2 in Spalte A überhaupt schon Nummern drin?

Es liebs Grüessli
Monika


www.jumper.ch
*** Generell: Bitte kein Crossposting ***


nach oben   nach unten

Freut mich :)
von: Timo


Geschrieben am: 24.05.2002 - 10:39:14

Hauptsache das Wochenende ist gerettet. Und wenn du dich soooo freust, werde ich gleich hellwach *g*

Viel Spass dann mit deinem neuen Makro. Wenn du öfter sowas brauchst, leg dir doch mal ein Buch zu, VBA für Beginner oder sowas. So habe ich mir den Krams auch beigebracht...

Schönes Wochenende wünsche ich dir!

Timo


nach oben   nach unten

ReMonika: Inhalt aus 4 Zellen ...........
von: Nancy

Geschrieben am: 24.05.2002 - 11:01:24

Hi Monika!

Danke nochmal für deine Hilfe, das Problem ist inzwischen gelöst...... ;-)

Dicken Gruss in die Schweiz ... und schönes Wochenende!

Nancy


 nach oben

Excel-Beispiele zum Thema "Inhalt aus 4 Zellen in and. Tab. übernehmen"
Zellinhalt suchen und Zelle auswählen Zellinhalt in zweitem Blatt ermitteln
Einlesen von Zellinhalten in Variablen Unterverzeichnisse mit Inhalt löschen
Zellinhalte zeilenweise sortieren Zellinhalt als Internet-Suchbegriff
Zellinhalt als Label-Aufschrift in UserForm Textprogramm starten und Inhalte von Zelle A1 eingeben
Nur Zellen mit Inhalt in ComboBox listen Zellinhalt und Kommentar nach Eingabe festlegen