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

Formel kopieren

Forumthread: Formel kopieren

Formel kopieren
08.07.2015 07:56:03
Bernd
Hallo zusammen,
ich möchte gerne eine Formel, die ich in eine bestimmte Zelle eintrage (aber ohne "=")in einen vorgebenen Spaltenbereich kopieren (aber dann mit "=").
Ich habe eine Musterdatei angehängt mit ergänzenden Kommentaten.
https://www.herber.de/bbs/user/98697.xlsx
Gruß,
Bernd

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel kopieren
08.07.2015 08:20:51
hary
Moin
Waehle den Bereich mit der maus aus und starte das Makro. 
Sub Formeleintragen()
With Selection
.FormulaLocal = "=" & Range("D1") '--FormulaLocal braucht deutsche schreibweise
End With
End Sub

oder Bereich fest. 
Sub Formeleintragen()
With Range("C2:C100")
.FormulaLocal = "=" & Range("D1") '--FormulaLocal braucht deutsche schreibweise
End With
End Sub

oder bis letzte SpalteB. 
Sub Formeleintragen()
With Range("C2:C" & Cells(Rows.count,2).end(xlup).Row)
.FormulaLocal = "=" & Range("D1") '--FormulaLocal braucht deutsche schreibweise
End With
End Sub

gruss hary

Anzeige
AW: Formel kopieren
08.07.2015 08:22:47
UweD
Hallo
so ?
Sub FFormel()
Const Zmax As Integer = 100
ActiveSheet.Range("C2:C" & Zmax).Formula = "=" & Range("D1")
End Sub

Gruß UweD

Besten Dank!
08.07.2015 16:49:52
Bernd
Klappt wie gewünscht!
;

Beliebteste Forumthreads (12 Monate)

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