Asterix2
Ich freue mich auf euer Feedback
Asterix2 am 11.01.2013
Wie füge ich der Mail einen Text hinzu?
Dim Epfänger As String Dim arrTo As Variant arrTo = Array(Range("A83").Value, Range("A1").Value, Range("A2").Value, Range("A3").Value, Range("A4").Value, Range("A5").Value) ActiveWorkbook.SendMail Recipients:=arrTo, Subject:="Ich bin eine Mail" & "_" &
8 Kommentare
0
2875
0
Asterix2 am 08.01.2013
Wenn Schriftfarbe rot dann Zelle gesperrt
Wenn die Schriftfarbe in einer Zelle rot ist, so soll diese gesperrt sein. Das war es dann eigentlich auch schon. Ich hoffe ihr habt eine
7 Kommentare
1
7942
1
Asterix2 am 07.01.2013
Aus Excel201 E-mail an mehrere Empfänger senden.
ActiveWorkbook.SendMail Recipients:=Range("A83"), Subject:="Mail" & "_" & strFile
2 Kommentare
0
3125
0
Asterix2 am 31.12.2012
Datei per VBA unter xlsx speichern
Public Sub SpeichernUnter() 'Quelle: Melanie Breden Const strPath As String = "D:\" 'Pfad anpassen Dim strFile As String strFile = ActiveSheet.Range("A2").Value If Dir(strPath) = ""
3 Kommentare
1
28861
0
Asterix2 am 24.12.2012
Nach kopieren einer Tabelle, Makro löschen
Um folgenden Code dreht sich meine Frage: Private Sub CommandButton1_Click() Dim strDateiName As String Dim strVerzeichnisPfad As String Dim strSaveDatei As String Dim bSpeichernDialog As
4 Kommentare
0
4022
0