Visual Basic Forum

MichaVanVog · Newbie Anmeldedatum: 02.11.2009 Beiträge: 1

Hallo meine Damen und Herren,

ich habe folgendes Problem: Ich muss eine Aufstellung für Gewicht machen. Aber es ist mühselig alles immer von Hand zu tippen und zu im Kopf zu berechnen. Daher wollte ich ein Makro schreiben bzw. aufnehmen, was mir wesentlich helfen sollte.

Sub Brutto()
ActiveCell.FormulaR1C1 = "=(RC[-1]*100/SummeNetto)/100*SummeBrutto"
Range("D5").Select
End Sub

Soweit funktioniert es für eine Zelle, aber ich möchte dass es für die ganze Spalte automatisch ausrechnet.

So sieht das ganze aus: [img]http://www.bilder-hosting.de/show/4IIRI.html[/img]
Und desweiteren können die Positionen von einem Mal zum anderen variiren, es können 5 Positionen zum Ausrechnen sein, aber es können auch mal 200 sein. Es wäre also auch geschickt, dass wenn man die Nettogewichte reinschreibt, automatisch eine Zeile hinzugefügt wird.

Hat jemand eine Idee oder ein Rat. ich bin der absolute Neuling, habe alles mögliche ausprobiert, jegliche Beispiele aus dem Internet reinkopiert, aber diese richtig zu verschachteln habe ich auch nicht geschafft.
_________________