Met een moderne werkplek wordt het mogelijk om vanaf elke locatie te werken.
Bescherm je medewerkers en gegevens tegen cyberbedreigingen.
Verhoog de productiviteit binnen je organisatie
Digitale transformatie met de eindgebruiker als middelpunt
De beste Office-apps voor uw organisatie
Het samenwerkings- platform voor uw team
Het mobiele, intelligente intranet
De bekende Office suite van Microsoft
Vergroot creativiteit en productiviteit met je dagelijkse AI-companion
Microsoft gecertificeerde technici lossen uw problemen op.
Strategisch advies op maat voor uw organisatie
Als in Microsoft Excel bij het openen van een Excel-werkmap wordt gedetecteerd dat de werkmap is beschadigd, wordt automatisch de modus Bestandsherstel gestart en wordt geprobeerd of de werkmap kan worden hersteld. Als de modus Bestandsherstel niet start, voert u het volgende handmatige proces uit om te proberen of u de Excel-werkmap kunt herstellen:
Als automatisch of handmatig herstellen beide niet werken, zijn er nog enkele herstelmethoden waarmee u uw gegevens misschien kunt redden. U kunt ook enkele preventieve maatregelen treffen om gegevensverlies te voorkomen, door automatisch een back-up van uw werkmap op te slaan of af en toe een herstelbestand te maken.
Kies een van de volgende methoden om uw gegevens te herstellen. Als de ene methode niet lukt, probeert u een andere. U kunt de Excel-werkmap ook proberen te herstellen met behulp van softwareoplossingen van derden.
BELANGRIJK Als een Excel-werkmap niet kan worden geopend vanwege een schijf- of netwerkfout, verplaatst u de werkmap naar een ander hardeschijfstation of een lokale schijf voordat u een van de onderstaande herstelopties probeert.
Dim X As Object
Counter = 2
‘ Bereken het aantal rijen met gegevens.
Aantal_rijen = UBound(ActiveChart.SeriesCollection(1). Waarden)
Worksheets(“Grafiekgegevens”). Cellen (1, 1) = “X Values”
‘ Schrijf x-aswaarden naar werkblad.
With Worksheets(“Grafiekgegevens”)
. Bereik (. Cellen (2, 1) _
. De cellen (Aantal_rijen + 1, 1)) = _
Application.Transpose(ActiveChart.SeriesCollection(1). XValues)
Eindigt met
‘ Lus alle reeksen in de grafiek en schrijf de waarden naar
‘ het werkblad.
For Each X In ActiveChart.SeriesCollection
Worksheets(“Grafiekgegevens”). Cellen (1, Counter) = X.Name
With Worksheets(“Grafiekgegevens”)
. Bereik (. Cellen (2, Counter) _
. De cellen (Aantal_rijen + 1, Counter)) = _
Application.Transpose(X.Values)
Eindigt met
Counter = Counter + 1
Pictogram voor tekenstijl
End Sub
Met een back-up van uw werkmap heeft u altijd toegang tot uw gegevens als de originele werkmap per ongeluk wordt verwijderd of beschadigd raakt.
[typo_alert style=”typo_blauw”]Automatisch een herstelbestand maken op een opgegeven interval[/typo_alert]
Met een herstelbestand van de werkmap kunt u er ook voor zorgen dat u toegang heeft tot uw gegevens als de werkmap per ongeluk wordt verwijderd of beschadigd raakt.
Contact
Supportdesk
Bezoekadressen
Het laatste Microsoft 365 nieuws in jouw mailbox? Schrijf je dan nu in voor onze nieuwsbrief!