Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
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
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1016to1020
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
1016to1020
1016to1020
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formel ändern ?

Formel ändern ?
16.10.2008 19:44:00
Kurt
Guten Abend,
habe folgende Formel:
Sheets("Angebot").Range("C41") = Sheets("Aktuell").Range("F41:F47")
habe so versucht, geht nicht:
Sheets("Angebot").Range("C41") = Sheets("Aktuell").Cells(41, 6) & Cells(47, 6)
Wie ?
Danke im voraus,
mfg Kurt P

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel ändern ?
16.10.2008 19:49:00
Tino
Hallo,
Du willst sieben Zellen in eine verfrachten und was davon?
Die Summe oder einen zusammenhängenden String oder was?
Gruß Tino
AW: Formel ändern ?
16.10.2008 19:56:42
Kurt
Hallo Tino,
von in Sheets("Aktuell").Range("F41:F47") die Zeilen von F41 bis F47
soll in
"C41 eingefügt werden, wobei ich dachte das die Zeilen bis C47 ergänzt werden,
mfg Kurt P
AW: Formel ändern ?
16.10.2008 20:03:00
Kurt
Hallo Tino,
hatte so gedacht:
Sheets("Angebot").Range("C41:C47") = Sheets("Aktuell").Range("F41:F47")
geht aber nicht.
mfg kurt p
AW: Formel ändern ?
16.10.2008 20:09:00
Tino
Hallo,
hier mal zwei Möglichkeiten.
Option Explicit

Sub Makro1()
'so 
Sheets("Aktuell").Range("F41:F47").Copy
Sheets("Angebot").Range("C41:C47").PasteSpecial (xlPasteValues)

'oder 
Sheets("Angebot").Range("C41:C47").Value = Sheets("Aktuell").Range("F41:F47").Value
End Sub


Gruß Tino

Anzeige
Danke Tino, habe die 2.Zeile genommen ! -)
16.10.2008 20:15:00
Kurt
AW: Formel ändern ?
16.10.2008 20:13:00
Matthias
Hallo
meinst Du so ?

Sub evtl_so()
Dim x As Byte
For x = 41 To 47
Sheets("Angebot").Cells(x, 3) = Sheets("Aktuell").Cells(x, 6)
Next
End Sub


Gruß Matthias

Hallo Matthias, Danke für die Hilfe -)
17.10.2008 16:37:00
Kurt

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige