Kan ikke vise dato

Hej Kjoelby
Prøve at skrive 1.8. (og brug punktum på "bogstavtastaturet" i stedet for det "punktum", der fungerer som et komma på taltastaturet.)

Eller skriv ' foran - så bliver datoen 1-8 opfattet som tekst. og vil blive vist i feltet.

Nu ved jeg ikke lige hvordan det fungerer i sådan en "kasserapport", men når man i celle E3 kan skrive måned og år, er det så ikke meningen at man kun skal skrive datoen uden månedsangivelse?

Eller du kan fjerne adgangskoden og rette alt det du har lyst til.

Åbn mappen og tryk Ctrl+F11. Indsæt denne makro:

Sub PasswordBreaker()
  'Author unknown
  'Breaks worksheet password protection.
  Dim i As Integer, j As Integer, k As Integer
  Dim l As Integer, m As Integer, n As Integer
  Dim i1 As Integer, i2 As Integer, i3 As Integer
  Dim i4 As Integer, i5 As Integer, i6 As Integer
  On Error Resume Next
    For i = 65 To 66
      For j = 65 To 66
        For k = 65 To 66
          For l = 65 To 66
            For m = 65 To 66
              For i1 = 65 To 66
                For i2 = 65 To 66
                  For i3 = 65 To 66
                    For i4 = 65 To 66
                      For i5 = 65 To 66
                        For i6 = 65 To 66
                          For n = 32 To 126
                            ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
                            Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
                            Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
                            If ActiveSheet.ProtectContents = False Then
                              MsgBox "Koden er brudt og dokumenet kan nu rettes!", vbExclamation + vbOKOnly
                              Exit Sub
                            End If
                          Next
                        Next
                      Next
                    Next
                  Next
                Next
              Next
            Next
          Next
        Next
      Next
    Next
End Sub


Afspil makroen. Det tager nok lidt tid (på min pc ca. 2-3 minutter. Så er adgangskoden væk og arket "er dit".

Alternativt kan du kopiere hele arket til et nyt ark - så ryger beskyttelsen (og en række formlen, men der er jo ikke så mange, at det er et større problem).

Jeg vil gerne have fjernet adgangskoden :o)
Jeg har prøvet at trykke Ctrl+F11. så åbner der et ark som hedder Makro 1. Er det korrekt ?
Og hvordan skal jeg indsætte denne makro ?

Makroen indsættes under THisworkbook. Når det er gjort, skifter du til regnearket, taster ALT+F8, og vælger at afspille makroen.

Problemet i regnearket er åbenbart, at skrifttypen er sat for stor.

jkorns> Effektiv makro! Hvor har du dog drevet den op? *S*

Jeg er ikke helt med..
Jeg har en Dansk version af Excel 2000
Når jeg trykker på Ctrl+F11. så åbner der et ark som hedder Makro 1. Er det korrekt ?
(Det er ikke Alt+F11 du mener ?)
Hvad kan THisworkbook hedde i den Danske version ?

jo, du starter med at taste Alt+F11
I venstre side af billedet kan du se en liste over de faneblade, der findes i regnearket. Et af disse faneblade hedder ThisWorkbook. Dobbeltklik på denne.

Indsæt koden i højre side af skærmen.
Skift så tilbage til regnearket.
Tast Alt+F8
Vælg makroen og afspil den
Vent indtil Excel vender tilbage. Som jkrons skriver, kan det godt tage noget tid.

Det virkede, tusind tak.
Hvem skal have point ???

Det må blive jkrons.

Det lyder rimeligt, jkrons -Vil du lige give et svar ?
I andre skal også have tak for hjælpen.

Her er et svar, og undskyld forvirringebn omkring Alt og Ctrl.

Mange tak :o)