VBA-regels werken niet na kopiëren naar ander excelbestand

[HSV]

Om die vervelende melding uit te schakelen kan je niet zonder.

Sub hsv()
Application.DisplayAlerts = False
  ActiveSheet.UsedRange.Formula = ActiveSheet.UsedRange.Formula
Application.DisplayAlerts = True
End Sub

Ps. Maar nog belangrijker is: waardoor komt het dat het tekst wordt.

 

[Arno1980]

Het lijkt erop dat deze is opgelost : ) hartelijk dank Philiep / gast0660 voor het oplossen!

 

[gast0660]

Mooi zo:thumb:
Hartelijk dank voor de feed back

 

[HSV]

Leuk; achter de schermen oplossingen doorgeven, alleen jammer dat het z'n doel volledig voorbij schiet.

Plaats hier de oplossing eens zodat zoekenden er ook wat aan hebben.

 

[gast0660]

Hoi Hsv,
De oplossing was simpel
Vena had het ook al aangegeven.

Zorg ervoor dat de tabnamen correct gespeld zijn

Het zaakje liep vast op tab 17, de tabnaam was 17 spatie en niet 17, verder is eraan mijn code niets veranderd.

 

[VenA]

verder is eraan mijn code niets veranderd.

Mij lijkt de code van HSV of die van mij iets efficiënter.

Een controle voor het archief

Sub IsTabNaamWelTabNaam()
For Each sh In Sheets
  If Len(sh.Name) <> Len(Trim(sh.Name)) Then c00 = c00 & sh.Name & vbLf
Next sh
MsgBox c00
End Sub

Hier zijn natuurlijk meerdere varianten voor