Thema Datum  Von Nutzer Rating
Antwort
Rot Formel mittels Makro kopieren, jedoch mit angepasster Formel
14.09.2022 11:30:44 Jay
Solved
14.09.2022 11:57:43 Der Steuerfuzzi
NotSolved
14.09.2022 12:18:01 Jay
NotSolved
14.09.2022 13:01:33 Gast29783
NotSolved
14.09.2022 13:28:07 Jay
NotSolved
14.09.2022 13:31:17 Gast9131
NotSolved
14.09.2022 13:47:06 Gast5700
NotSolved
14.09.2022 13:51:32 Jay
NotSolved
14.09.2022 17:12:43 Gast79231
NotSolved

Ansicht des Beitrags:
Von:
Jay
Datum:
14.09.2022 11:30:44
Views:
267
Rating: Antwort:
 Nein
Thema:
Formel mittels Makro kopieren, jedoch mit angepasster Formel

Liebes VBA Forum

Ich arbeite zurzeit an einem Makro, mit welchem wir eine Preistabelle erweitern.

Nun zu meinem Problem:

Die Formel zum Kopieren der gewünschten Felder steht.
Nun soll die Preisliste mit werten aus einer bestehenden Matrix ("=Kalkulation!A5", A6, A7, etc.) gefüttert werden.
Nur soll er dann auch die Formel am richtigen Ort wieder ansetzen. 
Leider rechnet Excel den Wert aus "ActiveCell.Offset(13, 0)"--> 13
auf die Formel dazu ABER das gewünschte Feld in der Matrix steht nur 1 Feld weiter unten.

Es sollte also in der Formel nur +1 machen und nicht + 13.

Der Wert auf der entnahme Matrix steht für den ersten Datensatz bei "=Kalkulation!A5"
Es sollte dann folgendes stehen "=Kalkulation!A6"
Beim nächsten "=Kalkulation!A7"

Er macht jetzt aber "=Kalkulation!A18"

Das Makro sieht wiefolgt aus:
----------------------------------------------------------------------------------
Sub DreiHundert()
Dim x As Long
x = Range("E1").Value
For x = 1 To x


' Duplizieren Makro
'

'
    Range("A4:O16").Select
    Selection.Copy
    ActiveCell.Offset(13, 0).Range("A1").Select
    Selection.Insert Shift:=xlDown
    Application.CutCopyMode = False
    ActiveCell.Range("A4").FormulaLocal = "=Kalkulation!A5"              (Hier habe ich versucht das zu lösen, ohne Erfolg)

Next
End Sub
----------------------------------------------------------------------------------

Vielen Dank für eure Expertise und Zeit.

Liebe Grüsse
Jay

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Formel mittels Makro kopieren, jedoch mit angepasster Formel
14.09.2022 11:30:44 Jay
Solved
14.09.2022 11:57:43 Der Steuerfuzzi
NotSolved
14.09.2022 12:18:01 Jay
NotSolved
14.09.2022 13:01:33 Gast29783
NotSolved
14.09.2022 13:28:07 Jay
NotSolved
14.09.2022 13:31:17 Gast9131
NotSolved
14.09.2022 13:47:06 Gast5700
NotSolved
14.09.2022 13:51:32 Jay
NotSolved
14.09.2022 17:12:43 Gast79231
NotSolved