Thema Datum  Von Nutzer Rating
Antwort
05.11.2014 12:38:16 Steffen
NotSolved
05.11.2014 13:48:43 Kentucky
NotSolved
Rot VBA Code gültig für umbenannte und kopierte Arbeitsblätter
 05.11.2014 14:02:15 Gast28810
NotSolved
05.11.2014 14:25:11 Kentucky
NotSolved
05.11.2014 15:44:07 Steffem
NotSolved
05.11.2014 16:03:51 Gast61378
NotSolved

Ansicht des Beitrags:
Von:
Gast28810		 Datum:
05.11.2014 14:02:15		 Views:
1264		 Rating:
     
Antwort:
  Ja
Thema:
VBA Code gültig für umbenannte und kopierte Arbeitsblätter

Erstmal vielen Dank für die schnelle Antwort, leider stecke ich nicht so tief in VBA, dass ich es sogleich umsetzen kann...Wie müsste ich deinen Vorschlag in meinen Code einbetten? Ich habe es versucht, leider bisher ohne Erfolg. Hier nochmal der Code:

 

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

If Not ActiveWorkbook.BuiltinDocumentProperties.Item("Content Status") = "Entwurf" Then

If ThisWorkbook.Worksheets("EUR").Range("B1").Value = "" Or _

ThisWorkbook.Worksheets("EUR").Range("B2").Value = "" Or _

ThisWorkbook.Worksheets("EUR").Range("B3").Value = "" Or _

      ThisWorkbook.Worksheets("EUR").Range("K3").Value = "" Then

                MsgBox "Please first fill in all general information (highlighted in green)!", vbCritical

Cancel = True

                        End If

          End If

End Sub

Gruß

Steffen

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
05.11.2014 12:38:16 Steffen
NotSolved
05.11.2014 13:48:43 Kentucky
NotSolved
Rot VBA Code gültig für umbenannte und kopierte Arbeitsblätter
 05.11.2014 14:02:15 Gast28810
NotSolved
05.11.2014 14:25:11 Kentucky
NotSolved
05.11.2014 15:44:07 Steffem
NotSolved
05.11.2014 16:03:51 Gast61378
NotSolved