Auf Thema antworten

JavaScript ist deaktiviert. Für eine bessere Darstellung aktiviere bitte JavaScript in deinem Browser, bevor du fortfährst.

Beitrag: <blockquote data-quote="Haui76" data-source="post: 2528605" data-attributes="member: 694765">Einfach den ActiveSheet Teil von ActiveSheet.Range ändern auf den Wert der im VBA Editor neben der Tabelle1 in Klammern steht.Bei mir ist das Sheet1 (Tabelle1) mit dem Button und Sheet2 (Tabelle 2) mit der Auswertung.Set FindKW = Sheet2.Range("B1:AG1").Find(WorksheetFunction.WeekNum(Now(), 2))Set FindProd = Sheet2.Range("A1:A12").Find("TV App")und natürlich beim Zähler das Gleiche.Sheet2.Cells(x, y).Value = Sheet2.Cells(x, y).Value + 1</blockquote> Bilder bitte hier hochladen und danach über das Bild-Icon (Direktlink vorher kopieren) platzieren.

Authentifizierung: Der grüne Frosch hüpft über die Hügel an den Bäumen vorbei in die Höhle. Bitte nenne das vierte Wort!