Freelance Project Requests info@CodeDocu.de Software Development in C# WPF Asp.Net Core Vba Excel Word SQL-Server EF Linq, UWP Net
#

Download:

Datei 1: 03_Formeln_kopieren_vba.xlsx

Excel: Formelfelder per Code kopieren

In der folgenden Excel-Datei sollen die Formeln der Zellen im Bereich D:E kopiert werden in die Felder darunter.
Die Felder oder Spalten sind per Namensvariable in der grünen Zelle I7 festgelegt und änderbar.


Die Kopie Funktion wird in vba umgesetzt durch

Range(sFunktionsspalten & "5").Copy
Range(sFunktionsspalten & "11").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=False



Durch Drücken der Code-Taste: Kopiere Formeln in Zellen werden dann nur die Formeln automatisch kopiert.


Der vba Code als Beispiel

Option Explicit On

Sub fp_Formeln_kopieren()
'----------------------< fp_Formeln_kopieren() >---------------------
'*diese Funktion kopiert die Formel der ersten Zelle in der BR-Mitteilungsspalte in alle weiteren Zellen
'*dadurch werden manuelle Einträge korrigiert

Dim sFunktionsspalten As String
sFunktionsspalten = Names("varFunktionsspalten").RefersToRange.Value
sFunktionsspalten = Replace(sFunktionsspalten, ":", "5:", 1, 1, vbBinaryCompare)
Range(sFunktionsspalten & "5").Copy
Range(sFunktionsspalten & "11").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
'----------------------< fp_Formeln_kopieren() >---------------------
End Sub

Mobile
»
Errorcode 450 Using Email.Session.Accounts Email_From
»
Open and Read a Word File with Excel
»
Excel: REwrite RTF to HTML
»
Excel: Convert numbers, date and time to text
»
Excel: Convert letters to Ascii numbers around
»
Excel File Dialog for Selecting File-Paths to Worksheet
»
Excel Template: Automatically send an e-mail for a specific entry in Excel
»
Excel vba: recognize an input in cells
»
Excel, vba: insert image into a cell of cache
»
Excel: Formelfelder per Code kopieren

.

Contact for Jobs, Project Requests: raimund.popp@microsoft-programmierer.de