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
Anonyymi
1
228
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
- 24214990
Voima biisejä, mikä antaa hyvää mieltä ja vomaannuttaa
Mikä antaa voimaa ja hyvää mieltä, jos tuntuu hankalalta ja vaikealta, voima biisi tai biisejä?461924- 1841446
Huomenna sähkö maksaa jo yli 60 snt/kWh. Milloin ALV putoaa?
Kysynkin persuilta, että milloin aiotte pudottaa sähkön arvonlisäveron kuten Marinin hallitus teki sähkön hinnan noustes1091342- 281209
- 122958
Huomioon ottaminen
Oletko osannut ottaa kaivattusi tai hänen (mahdolliset) tunteet huomioon? Oletko sivuuttanut ne tarkoituksella tai vahin30912Sinkkusiskoni pliis kertokaa
Sinkkunaisena haluaisin joskus normaalia läheisyyttä ja yhdessäoloa, ilman velvoitteita. Olen vapaa ja lapseton, eikä ex81774Nainen, se on sellainen juttu että kun sä vain nautit
Niin me miehet tehdään ne työt että sä voisit nauttia. Kato siinä ku sä meet mukamas töihin suojatyöpaikkaas lämpimään t80738- 75668