ich muss einem Makro sagen, das bei jeder Ausführung immer, ausgehend von Zelle A2,sechs Spalten nach rechts und acht Zeilen nach unten ausgewählt werden und diese als Screenshot in Outlook übertragen werden sollen.
Soweit bin ich schon. In Zeile drei fehlt mit Sicherheit etwas, aber was?!
Sheets("2019_Urlaubsplan_KDV").Select
Range("A2").Select
ActiveCell.Offset(20, 6).Select (?)
Range("A2:G10").CopyPicture xlScreen, xlBitmap
Dim oApp As Object
Rest funktioniert, außer der Auswahl des Zellbereichs. Hintergrund für den relativen Verweis ist, das regelmäßig Spalten gruppiert werden. Vielleicht ist
das wichtig?!
Danke für Eure Hilfe. Gruß Dirk