Note: The other languages of the website are Google-translated. Back to English

Hur markerar du specifik text i en cell baserat på annan text?

I Excel kan det vara lätt för oss att markera cellerna baserat på en specifik text, men här vill jag markera en specifik text i en cell för att göra den enastående men inte hela cellen. Detta kanske är besvärligt för de flesta av oss. Den här artikeln kommer jag att prata om några knep för att lösa detta jobb i Excel.


Markera en eller flera specifika texter i flera celler med VBA-kod

Till exempel har jag en rad textsträngar och nu vill jag markera den specifika texten ”Himmel”I dessa celler för att få resultatet som följande skärmdumpar visas:

För att bara markera en del av texten i en cell kan följande VBA-kod hjälpa dig.

1. Markera de celler som du vill markera den specifika texten och håll ned ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande kod i Modulerna Fönster.

VBA-kod: Markera en del av texten i en cell:

Sub HighlightStrings()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp As String
Dim x As Long
Dim m As Long
Dim y As Long
cFnd = InputBox("Enter the text string to highlight")
y = Len(cFnd)
For Each Rng In Selection
  With Rng
    m = UBound(Split(Rng.Value, cFnd))
    If m > 0 Then
      xTmp = ""
      For x = 0 To m - 1
        xTmp = xTmp & Split(Rng.Value, cFnd)(x)
        .Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
        xTmp = xTmp & cFnd
      Next
    End If
  End With
Next Rng
Application.ScreenUpdating = True
End Sub

3. Tryck sedan på F5 nyckel för att köra den här koden, och en snabbruta kommer att dyka upp för att påminna dig om att du anger texten som du bara vill markera, se skärmdump:

4. Och klicka sedan på OK -knappen, all text du angett har bara markerats i cellerna, se skärmdump:

tips: Om du behöver markera flera nyckelord från textsträngarna, använd följande kod:
VBA-kod: Markera flera nyckelord från textsträngar:
Sub HighlightStrings()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp As String
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum As Integer
Dim xArrFnd As Variant
Dim xStr As String
cFnd = InputBox("Please enter the text, separate them by comma:")
If Len(cFnd) < 1 Then Exit Sub
xArrFnd = Split(cFnd, ",")
For Each Rng In Selection
With Rng
For xFNum = 0 To UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Len(xStr)
m = UBound(Split(Rng.Value, xStr))
If m > 0 Then
xTmp = ""
For x = 0 To m - 1
xTmp = xTmp & Split(Rng.Value, xStr)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
Next
End If
Next xFNum
End With
Next Rng
Application.ScreenUpdating = True
End Sub

Ange sedan de nyckelord som du vill markera i den utpekade rutan (separera orden med ett komma), se skärmdump:

Och klicka sedan på OK knappen har de angivna orden markerats på en gång, se skärmdumpar:

Anmärkningar: Ovanstående koder är skiftlägeskänsliga.


Markera en eller flera specifika texter i flera celler med en fantastisk funktion

Om du inte känner till koden i Excel kommer jag här att introducera ett enkelt verktyg - Kutools för Excel, med dess Markera nyckelord funktionen kan du markera det specifika ett eller flera nyckelord samtidigt i cellerna.

Notera:För att tillämpa dessa Markera nyckelord funktioner, först bör du ladda ner Kutools för Excel, och använd sedan funktionerna snabbt och enkelt.

När du har installerat Kutools för Excel, gör så här:

1. Klicka Kutools > text > Markera nyckelord, se skärmdump:

2. I Markera nyckelord dialogrutan, gör följande:

  • Välj det dataområde som du vill använda från Mätområde textruta;
  • Välj cellerna som innehåller de nyckelord som du vill markera, du kan också ange nyckelorden manuellt (åtskilda med komma) i Nyckelord textruta
  • Äntligen bör du ange en teckensnittsfärg för att markera texterna med kryss Markera nyckelordets färger alternativ. (Om du vill färga hela cellerna som innehåller nyckelorden väljer du Markera cellinnehållets färger alternativ)

3. Klicka sedan Ok -knappen, alla angivna texter har markerats enligt nedanstående skärmdump:

Anmärkningar: Den här funktionen är inte skiftlägeskänslig, om du vill markera texten med skiftlägeskänslighet, kontrollera match Case i Markera nyckelord dialog ruta.


Markera specifik text i en cell baserat på annan text med VBA-kod

Här är en annan situation, jag har två kolumner där den första kolumnen innehåller textsträngarna och den andra kolumnen är den specifika texten, nu måste jag markera den relativa texten i den första kolumnen baserat på den specifika texten i den andra kolumnen för varje rad.

1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande kod i Modulerna Fönster.

VBA-kod: Markera en del av texten i en cell baserat på annan text:

Sub highlight()
'Updateby Extendoffice
    Dim xStr As String
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim xChar As String
    Dim I As Long
    Dim J As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
LInput:
    Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "not support multiple columns"
        GoTo LInput
    End If
    If xRg.Columns.Count <> 2 Then
        MsgBox "the selected range can only contain two columns "
        GoTo LInput
    End If
    For I = 0 To xRg.Rows.Count - 1
        xStr = xRg.Range("B1").Offset(I, 0).Value
        With xRg.Range("A1").Offset(I, 0)
            .Font.ColorIndex = 1
            For J = 1 To Len(.Text)
                If Mid(.Text, J, Len(xStr)) = xStr Then .Characters(J, Len(xStr)).Font.ColorIndex = 3
            Next
        End With
    Next I
End Sub

3. Efter att ha klistrat in koden och tryck på F5 för att köra den, kommer en snabbruta att dyka upp för att påminna dig om att välja dataområdet som både innehåller textsträngen och specifik text du vill markera och baserat på, se skärmdump:

4. Och klicka sedan på OK -knappen, all motsvarande text i den första kolumnen baserat på den specifika texten i den andra kolumnen har färgats rött som följande skärmdump:


Fler relativa artiklar:

  • Fet text när två kolumner sammanfogas i Excel
  • I Excel-kalkylbladet, efter att ha sammanfogat två cellvärden med formler, kan det hända att det inte kommer att fetstil en del av texten i den kombinerade formelcellen. Det här kan vara irriterande ibland, hur kan du fet texttext när du sammanfogar två kolumner i Excel?
  • Sammankoppla cellkolumner och behåll textfärg i Excel
  • När vi sammanfogar eller kombinerar cellkolumner i en kolumn kommer cellformateringen att gå förlorad (som vi alla känner till). Den här artikeln kommer jag att presentera några knep för att kombinera cellkolumnerna i en och hålla textfärgen så lätt som möjligt i Excel.
  • Visa specifik text baserat på värden i en annan kolumn
  • Antag att jag har en lista med siffror, nu vill jag visa en viss text i en annan kolumn baserat på de här kolumnnumren. Till exempel, om cellnumret är mellan 1-100 vill jag att texten "Minska" ska visas i intilliggande cell, om siffran är mellan 101-200 visas en text "Stabil" och om siffran är större än 200 , visas texten "Öka" som följande skärmdump visas. För att lösa denna uppgift i Excel kan följande formler i den här artikeln hjälpa dig.
  • Summa celler med text och siffror i Excel
  • Till exempel har jag en lista med värden som innehåller numeriska och textsträngar, nu vill jag bara summera siffrorna baserat på samma text, titta på följande skärmdump. Normalt kan du inte summera värdena i listan med textsträng direkt, här presenterar jag några formler för att hantera denna uppgift.

De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2021 och 365. Stöder alla språk. Enkel implementering i ditt företag eller organisation. Fullständiga funktioner 30 dagars gratis provperiod. 60 dagars pengarna tillbaka-garanti.
kte-flik 201905

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
officetab botten
Sortera kommentarer efter
Kommentarer (39)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Tack så mycket för dina tips och makron. Jag kan inte föreställa mig vad jag skulle göra utan dem.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag har kontrollerat båda givna koderna i excel 2016 men fungerar inte.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag använde Excel365. Första VBA fungerar inte. Den andra kan inte markera korrekta sökord, dvs fungerar inte också
Denna kommentar minimerades av moderatoren på webbplatsen
Tack !!!
Denna kommentar minimerades av moderatoren på webbplatsen
Jag får ett felmeddelande och när jag felsöker markeras det här avsnittet m = UBound(Split(Rng.Value, cFnd))
Denna kommentar minimerades av moderatoren på webbplatsen
Det fungerade bra för mig, tack för att du delar detta med världen.
Denna kommentar minimerades av moderatoren på webbplatsen
Kan någon hjälpa mig med en kod för att "kopiera de markerade orden i en annan kolumn".
Denna kommentar minimerades av moderatoren på webbplatsen
hur kunde jag få den här koden att fungera men få den att markera i en annan färg än röd?
Denna kommentar minimerades av moderatoren på webbplatsen
Hallå,
Om du vill markera texten med annan färg behöver du bara ändra färgindexnummer 3 till annat färgindexnummer i skriptet nedan:
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3

Vänligen prova det. Tack!
Denna kommentar minimerades av moderatoren på webbplatsen
Hallå,
Med samma makro vill jag markera någon annan text med den olika färgen ex: Grön, snälla hjälp mig med detta
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Sukumar,
Jag kan tyvärr inte lösa ditt problem.
Kommentera gärna här om någon annan har lösningen.
Tack!
Denna kommentar minimerades av moderatoren på webbplatsen
Tack för "Markera en specifik text inom flera celler med VBA-kod" Det fungerar utmärkt. Förklara gärna:
rad 18 xTmp = xTmp & Split(Rng.Value, cFnd)(x)
Varför måste "(x)" visas där det är? Skickas värdet av x till Split-funktionen som ett namngivet argument utan namnet? Jag skulle verkligen vilja förstå detta koncept. Tack för din hjälp och denna funktion. Jag har lärt mig något jag inte visste.
Denna kommentar minimerades av moderatoren på webbplatsen
hej, jag märkte att det här är skiftlägeskänsligt högliter. Var kan jag ändra att det skulle markera gemener och versaler i önskat ord
Denna kommentar minimerades av moderatoren på webbplatsen
Hej lolster,

I de två ovanstående koderna, vilken kod vill du identifiera skiftlägeskänslig?
Vi kommer att ändra koden åt dig!
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, jag skulle vilja ställa samma fråga för att markera både gemener och versaler, i fallet nedan:

"hitta och markera nyckelord1, nyckelord2 och nyckelord3 i alla textsträngar även när en sträng innehåller mer än ett av dessa sökord (alla ska markeras i den specifika textsträngen)"
Denna kommentar minimerades av moderatoren på webbplatsen
Sub HighlightStrings()
Application.ScreenUpdating = False
Dim Rng som intervall
Dim cFnd As String
Dim xTmp som sträng
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum Som heltal
Dim xArrFnd som variant
Dim xStr As String
cFnd = InputBox("Skriv in texten, separera dem med kommatecken:")
Om Len(cFnd) < 1 Avsluta Sub
xArrFnd = Split(cFnd, ","")
För varje Rng i urval
Med Rng
För xFNum = 0 Till UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Len(xStr)
m = UBound(Split(Rng.Value, xStr))
Om m > 0 Då
xTmp = ""
För x = 0 Till m - 1
xTmp = xTmp & Split(Rng.Value, xStr)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
Nästa
End If
Nästa xFNum
Sluta med
Nästa Rng
Application.ScreenUpdating = True
End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, Mahendra
Om du vill att koden inte är skiftlägeskänslig, använd koden nedan:
Sub HighlightStrings()
'Updateby Extendoffice
Application.ScreenUpdating = False
Dim Rng As Range
Dim cFnd As String
Dim xTmp As String
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum As Integer
Dim xArrFnd As Variant
Dim xStr As String
cFnd = InputBox("Please enter the text, separate them by comma:")
If Len(cFnd) < 1 Then Exit Sub
xArrFnd = Split(UCase(cFnd), ",")
For Each Rng In Selection
With Rng
For xFNum = 0 To UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Len(xStr)
m = UBound(Split(UCase(Rng.Value), UCase(xStr)))
If m > 0 Then
xTmp = ""
For x = 0 To m - 1
xTmp = xTmp & Split(UCase(Rng.Value), UCase(xStr))(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
Next
End If
Next xFNum
End With
Next Rng
Application.ScreenUpdating = True
End Sub


Gör ett försök, hoppas det kan hjälpa dig!
Denna kommentar minimerades av moderatoren på webbplatsen
Finns det något sätt att göra den första VBA-koden på ett sätt att fungera med en fast lista med sökord utan en promt-ruta? Till exempel vill jag alltid hitta och markera nyckelord1, nyckelord2 och nyckelord3 i alla textsträngar även när en sträng innehåller mer än ett av dessa nyckelord (alla ska markeras i den specifika textsträngen). Och är det möjligt att göra nyckelord1 och nyckelord2 röda men det tredje bara fetstilt?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Arturs,

För att markera flera nyckelord från en cell kan följande vba-kod hjälpa dig:(du bör separera orden med semikolon i den utfällda inmatningsrutan)

Sub HighlightStrings()
Application.ScreenUpdating = False
Dim Rng som intervall
Dim cFnd As String
Dim xTmp som sträng
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum Som heltal
Dim xArrFnd som variant
Dim xStr As String
cFnd = InputBox("Skriv in texten, separera dem med semikolon:")
Om Len(cFnd) < 1 Avsluta Sub
xArrFnd = Split(cFnd, ";")
För varje Rng i urval
Med Rng
För xFNum = 0 Till UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Len(xStr)
m = UBound(Split(Rng.Value, xStr))
Om m > 0 Då
xTmp = ""
För x = 0 Till m - 1
xTmp = xTmp & Split(Rng.Value, xStr)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
Nästa
End If
Nästa xFNum
Sluta med
Nästa Rng
Application.ScreenUpdating = True
End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Skyyang! Jag upptäckte att det skulle uppstå ett fel om koden kördes - den kunde inte ange ordet efter ett kolon. Har du något förslag för att förbättra det? Tack så mycket!
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, IvyCY,
Om du vill specificera orden med ett kolon behöver du bara ändra semikolonsymbolen till kolon, använd följande kod:

Sub HighlightStrings()
Application.ScreenUpdating = False
Dim Rng som intervall
Dim cFnd As String
Dim xTmp som sträng
Dim x As Long
Dim m As Long
Dim y As Long
Dim xFNum Som heltal
Dim xArrFnd som variant
Dim xStr As String
cFnd = InputBox("Skriv in texten, separera dem med kolon:")
Om Len(cFnd) < 1 Avsluta Sub
xArrFnd = Split(cFnd, ":")
För varje Rng i urval
Med Rng
För xFNum = 0 Till UBound(xArrFnd)
xStr = xArrFnd(xFNum)
y = Len(xStr)
m = UBound(Split(Rng.Value, xStr))
Om m > 0 Då
xTmp = ""
För x = 0 Till m - 1
xTmp = xTmp & Split(Rng.Value, xStr)(x)
.Characters(Start:=Len(xTmp) + 1, Length:=y).Font.ColorIndex = 3
xTmp = xTmp & xStr
Nästa
End If
Nästa xFNum
Sluta med
Nästa Rng
Application.ScreenUpdating = True
End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
Tack för ditt svar, skyyang!

Men det fungerade fortfarande inte.
Kanske var min fråga ganska förvirrande. Ett exempel kan göra det tydligare.
Till exempel är ett av mina nyckelord "skydda". Texten i cellerna kan visas som "Våra sätt att lösa problemet: skydd och blablabla..." Det kan finnas mellanslag mellan ":" och "skydd" eftersom formateringen av texten inte alltid är densamma. Här kunde nyckelordet "skydd" inte markeras av koderna ovan. Det är problemet.

Jag har försökt flera gånger men misslyckats. Jag har också funderat på att ta bort skiljetecken i cellerna, men det skulle äventyra förståelsen av texterna. Så jag ställde frågan. Hoppas du inte har något emot det.

Tack så mycket!

Bästa hälsningar!
Denna kommentar minimerades av moderatoren på webbplatsen
Finns det något sätt att ta bort alla de markerade orden?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Ace,
För att radera texten baserad på en annan kolumncell, kan vba-koden nedan hjälpa dig, försök det.
Sub DeleteStr()
Dim xStr As String
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim xChar As String
Dim jag så länge
Dim J As Long
On Error Resume Next
Om ActiveWindow.RangeSelection.Count > 1 Då
xTxt = ActiveWindow.RangeSelection.AddressLocal
annars
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
LInput:
Set xRg = Application.InputBox("vänligen välj dataintervall:", "Kutools för Excel", xTxt, , , , , 8)
Om xRg är ingenting, avsluta Sub
Om xRg.Areas.Count > 1 Då
MsgBox "stöder inte flera kolumner"
Gå till LInput
End If
Om xRg.Columns.Count <> 2 Då
MsgBox "det valda intervallet kan bara innehålla två kolumner"
Gå till LInput
End If
För i = 0 Till xRg.Rows.Count - 1
xStr = xRg.Range("B1").Offset(i, 0).Värde
With xRg.Range("A1").Offset(i, 0)
.Font.ColorIndex = 1
För J = 1 Till Len(.Text)
Om Mid(.Text, J, Len(xStr)) = xStr Då
.Tecken(J, Len(xStr)).Ta bort
End If
Nästa
Sluta med
Nästa jag
End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
HI
Jag är regelbunden besökare på din webbplats. Din hemsida är väldigt användbar för mig. Denna kod ändrar teckensnittets färg. Jag vill markera särskilda ord (till exempel Infoga, blank) i gul bakgrund. Jag vill lyfta fram detta. Inte bara en typsnittsfärg. Fortsätt med det stora arbetet!!! Tack så mycket.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, Madhusudhanan,
Det kanske inte finns något direkt sätt att markera en del av text i en cell med bakgrundsfärg i Excel-kalkylblad.
Om du har en annan bra metod, vänligen kommentera här.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag får ett körtidsfel '13', skriv in match när jag kör skriptet. några förslag?
Denna kommentar minimerades av moderatoren på webbplatsen
Jag hade samma problem; Jag upptäckte att en av mina kolumner var formler och det letade i dem vilket var det som utlöste felet 13. Valde ett intervall utan formel som innehöll texten att markera och det fungerade.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej,
kan någon hjälpa mig med följande

mina celler i kolumn "G" innehåller texten från kolumn Z till AN, inte obligatoriskt att kolumn g innehåller all text från Z till AN.

Mitt arbete här är att markera texten i kolumn G om den inte är tillgänglig i någon av kolumn Z - AN

Till exempel: Cell G1 innehåller (Hallå herr jag mår bra) men texten "Sir" finns inte i kolumn "Z1" till "AN1"

Så jag måste markera texten "Sir"
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, någon som kan hjälpa mig detta. Jag vill markera det specifika numret i cell inom samma mening. till exempel: " 2 dagars ledighetsskanning " i denna mening vill markera nummer.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej,
Snälla någon hjälp mig. Jag vill markera det specifika numret i samma mening. Till exempel: " 2 days leave scansion" vill bara markera "2" i meningen.
Denna kommentar minimerades av moderatoren på webbplatsen
Detta var väldigt användbart, tack så mycket!
Denna kommentar minimerades av moderatoren på webbplatsen
Grymt bra. tack
Denna kommentar minimerades av moderatoren på webbplatsen
Wow! Tack!
Det finns inga kommentarer här ännu
Ladda fler
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0   Tecken
Föreslagna platser

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL