---

hallo,

ich möchte gerne mit vba excel in tabelle 1 z.b in A2 und B1 etwas schreiben und es sollte auf tabelle 2 z.b in A4 und B2 auch erscheinen.
wie gehe ich da am besten vor ?

mfg

ein blutiger anfänger =) 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

normal in xls,
Formel in Tabelle2 A4: =Tabelle1!A2

Bsp. via vba (Rechtsclick auf Blattregister > Code anzeigen):

Private Sub Worksheet_Activate()
Range("A4").Value = Sheets("Tabelle1").Range("A2").Value
End Sub

HTH Nancy

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hallo,

hab da was

wie kann ich hier mehrere zellen nehmen, will nicht für jede zelle (z.b: A2,B7,C2,E1) ein neues schreiben =)

ist mit einer befehlsschaltfläche

Sub CopyCells()

    'On Error Resume Next

    ActiveWorkbook.Worksheets("Tabelle2").Cells(4, 2).Value = ""
   

  With ActiveWorkbook.Worksheets("Tabelle2")
            .Cells(4, 2).Value = ""
           
    End With
   
    ActiveWorkbook.Worksheets("Tabelle2").Cells(4, 2).Value = ActiveWorkbook.Worksheets("Tabelle1").Cells(5, 2).Value

End Sub

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Auch Hallo,

häng' doch mal ne Beispieldatei ran 

lg Nancy
--
Money is the root of all evil, and man needs roots

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Erlaubte Datei-Typen: .gif , .jpg , .zip , .pdf , .txt , .mid
wie kann ich eine exceldatei anhängen ?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Vielleicht als ZIP verpackt?!

Grüße

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hab hier kein zip=) dann muss ich halt warten bis ich zuhause bin.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

HI Sherp,
benenne die *.xls Datei z.B. in *.txt um. Dann kannst du Die Datei anhängen 

------------------
Viele Grüße aus dem Schwarzwald
gismo
Meine bescheidene Website

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Beispiel.zip

ich hab es mir zippen lassen hoffe es geht ...
nochmals zu meiner frage =)

wenn ich bei Text was schreibe sollte es in Drucken1 auch erscheinen.
wenn ich in Text2 was schreibe sollte es in Drucken2 ebenfalls erscheinen.

Drucken1 und Drucken2 werden nachher versteckt.

wie kann ich das am besten mit VBA machen ?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Beispiel.txt

ob dies der Weisheit letzter Schluss ist,
weiss ich auch nicht 

lg Nancy

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hallo,

genau sowas hab ich gesucht =) danke dir !

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

Ich hab bei der excel-datei eine befehlsschaltfläche um das blatt zu drucken gemacht. jetzt muss ich aber das blatt mit der druckversion ausblenden, leider kommt dann der fehler: "die printout-methode des workseeht-objektes konnte nicht ausgeführt werden".  was muss ich da ändern ?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Sherp,

das kommt daher, weil das Blatt versteckt ist.
Blende das Blatt vorm Print ein und danach  gleich wieder aus.

HTH
Nancy
--

Sub Drucken_1()

Application.ScreenUpdating = False 'Bildschirmaktualisierung aus

Sheets("Drucken1").Visible = True 'Blatt sichtbar
Sheets("Drucken1").PrintOut
Sheets("Drucken1").Visible = False 'Blatt verstecken

Application.ScreenUpdating = True 'Bildschirmaktualisierung an

End Sub

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP