Linkit näkyviin
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?
1
<50
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
Miksei työ kelpaa suomalaisille?
Rakennus-, siivous-, ja hoiva-alakin täynnä ulkomaista työvoimaa ja kotimaiset vuosis kortistossa. Mistä moinen oikein johtuu. Ovatko korvaukset liia4184893Talouselämä-julkaisu tykittää kovaa tekstiä Usan taloudesta
"Joe Biden nousee velkaantuvan valejättiläisen johtoon – Yhdysvaltain budjettivajeet repeävät ja velkavuori kasvaa" https://www.talouselama.fi/uutis1031750