Kun avaan asiakirjan, Excel ilmoittaa aina, että olis linkkejä muihin tiedostoihijn ja päivitetänkö ne. Ei pitäisi olla. Millä konstilla ne saisi selville ja poistettua?
Linkit näkyviin
1
226
Vastaukset
- Anonyymi
No vaikkapa tällaisella
Sub Tarkista()
For Each c In Worksheets("Sheet1").Range("A1:c5")
With c.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
If c.Value <> "" Then
cc = c.Value
If c.HasFormula = True Then ' 111
c.Interior.ColorIndex = 38
If InStr(c.Formula, "!") > 0 Then
c.Interior.ColorIndex = 7 ' !linkki
End If
If InStr(c.Formula, "[") > 0 Then
c.Interior.ColorIndex = 3 ' Red !linkki
End If
' c.Interior.ColorIndex = 4 ' Green
Else
c.Interior.ColorIndex = 4
If c.HasArray = True Then
c.Interior.ColorIndex = 15 '
End If
If IsNumeric(cc) = True Then
c.Interior.ColorIndex = 6 'Yellow
End If
End If ' 111
End If
Next c
End Sub
Function IsFormula(cell_ref As Range)
IsFormula = cell_ref.HasFormula
End Function
End Function
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Vedonlyöntiä .
Olen valmis lyömään ison vedon , että homma kaatuu . Jos kerta Sivonen ei lähde mukaan , niin ei tuoho usko kukaan muuka343504- 113038
- 1372651
Mikä on pahinta, mitä kaivatullesi
pelkäät tapahtuvan? Jos kuolemaa, vakavia sairauksia yms. ei lasketa?1032625Turvaan tulleet lähettävät omia lapsiaan vaaraan - hullua
MOT-ohjelman jakso ”Loma vaihtui kahleisiin” kertoi, kuinka Suomessa ja muualla Euroopassa asuvat somaliperheet lähettäv742595- 411418
Hei Antti. Minähän varoitin jo 2 v sitten, ettei sinusta tule pääministeriä, vaikka kuinka
voittaisit vaalit. Vasurit ovat aina puukottaneet toisiaan selkään, eivät koskaan edestäpäin. Marinistit varsinkin IL t61228Päivi Räsänen sai kutsun kongressiin todistajaksi.
Pystyykö Päivi pysymään totuudessa ja kertomaan kongressille, että raamattu ei ole lakikirja jota pitäisi noudattaa poli3961135Minkä kouluarvosanan (4-10) annat Thank God, sä tulit! sarjalle?
Katsoitko Thank God, sä tulit!? Uusi viihdeohjelma ei ollut kaikkien makuun, mutta jotkut tykkäsivät. Minkä kouluarvos501033Kaikkea hyvää kaikki
Kaikkea hyvää kaikki ja positiivisia ja hyviä asioita. Kylmää on kovia pakkasia. Pikku hiljaa kevättä kohti taas. Voimaa6870