Vraag : „De vensters er niet in om zijn geslaagd om b/c te laden een vereist dossier mist of bedorven“ CI.dll die

Vensters van Hi

de " slaagden te beginnen er niet in. Een recente hardware of softwareverandering zou de oorzaak kunnen zijn. Om probleem te bevestigen:
1. Neem uw schijf van de venstersinstallatie op en begin uw computer.
2 opnieuw. Kies uw taal het plaatsen…
3. Klik „reparatie uw computer. „

I deed bovengenoemd en proc. kon bevestigen niet.  

Any ideas

dc

Antwoord : „De vensters er niet in om zijn geslaagd om b/c te laden een vereist dossier mist of bedorven“ CI.dll die

Het is niet volledig duidelijk hoe voorgesteld maar het volgende probeer die serverx met servery voor alle hyperlinks op activesheet vervangt.

Vervang bothe duidelijk koorden in sub voor de daadwerkelijke vereiste waarden

Chris
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

Sub redirectLink ()
Schemerige rng als Waaier

    Voor Elke rng in ActiveSheet.UsedRange.Cells
        Als rng. Hyperlinks.Count = 1 toen
            Met rng. Hyperlinks (1)
                . Het adres = vervangt (. Adres, „ServerX“, „ServerY“, 1, vbTextCompare)
                .TextToDisplay = vervang (.TextToDisplay, „ServerX“, „ServerY“, 1, vbTextCompare)
            Eind met
        Eind als
    Daarna
Sub van het eind
Andere oplossingen  
 
programming4us programming4us