VB(2007) code weigert plotseling

[pelikano]

Had ik precies de code die ik wilde, blijkt het vandaag de code opeens niet meer uit te voeren in 2007! In 2003 werkt de code nog wel. Is mijn 2007 "stuk"?

Is er iets op workbook niveau wat de uitvoer van VB tegen houdt?

• Ik heb berekenen op automatisch staan(ook handmatig geprobeerd).
• De sheet is opgeslagen als "uitvoerbaar met macro's".
• Dezelfde code in een nieuwe TABBlad werkt ook niet in hetzelfde workbook.
• Dezelfde code geplaatst in een nieuwe lege workbooksheet werkt wel.

Plaats deze achter je tabblad Rapportage

Private Sub Worksheet_Activate()
    With Cells(4, 4)
        .CurrentRegion.ClearContents
        For Each sh In Sheets
        c0 = c0 & sh.Name & "|"
        Next
    .Resize(Sheets.Count) = WorksheetFunction.Transpose(Split(c0, "|"))
    End With
End Sub

 

[Hoornvan]

pelikano,

Dezelfde code in een nieuwe TABBlad werkt ook niet in hetzelfde workbook.
Dezelfde code geplaatst in een nieuw leeg workbooksheet werkt wel.

Als ik dit zo leest moet het in je bestandje zitten.

 

[pelikano]

dat het in het bestand zit, was ik ook achter. Ik heb inmiddels nog meer info;

• macro werkt wel
• kopiëren van tabbladen naar nieuw workbook lukt niet(past niet volgens Excel...)
• kopiëren van blok cellen naar nieuw workbook gelijkwaardig blok lukt ook niet.

 

[pelikano]

Excel 2007 blijkt de kluts kwijt. Ik heb \Application Data\Microsoft\Excel\Excel11.xlb weggezet, Excel 2007 zonder \Application Data\Microsoft\Excel\Excel11.xlb opgestart maar dan werken de macro's ook niet meer.

\Application Data\Microsoft\Excel\Excel11.xlb teruggeplaatst en de problemen sheet gestart. Nu krijg ik de melding dat macro's uit staan.
De macro's aanzetten zorgt ervoor dat ook de VB weer zijn werk doet...

Thx Pelikano :d