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

Hur flyttar jag markören automatiskt till en specifik cell i Excel?

Ibland kan du behöva hoppa till en specifik cell för något ändamål. Den här artikeln visar dig metoder för att flytta markören till en specifik cell i detaljer.

Flytta markören automatiskt till en specifik cell med rutan Namn
Flytta markören automatiskt till specifik cell med VBA-kod


Flytta markören automatiskt till en specifik cell med rutan Namn

I rutan Namn kan du enkelt flytta markören till en specifik cell i Excel.

1. I Namn rutan, ange den specifika cellreferens du ska hoppa till och tryck sedan på ange nyckel.

Markören flyttas sedan direkt till den angivna cellen.

Anmärkningar: Om du behöver hoppa till den angivna cellen i ett annat kalkylblad, till exempel hoppa till cellen C30 i Sheet2, skriv Blad2! C30 i rutan Namn och tryck sedan på Enter.


Flytta markören automatiskt till specifik cell med VBA-kod

Följande VBA-kod hjälper dig att flytta till en specifik cell på en gång i Excel.

1. Tryck andra + F11 samtidigt för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer dubbelklicka på Thans arbetsbok i den vänstra rutan för att öppna ThisWorkbook (kod) fönster. Kopiera och klistra in nedanstående VBA-kod i fönstret.

VBA-kod: Flytta till början eller början av nästa rad för datainmatning

Sub jumpnext()
    Range("F100").Select
End Sub

Anmärkningar: I koden är F100 den angivna cellen du hoppar till. Du kan ändra det efter behov.

3. tryck på F5 för att köra koden, flyttas markören till cell F100 i det aktuella kalkylbladet omedelbart.


Relaterade artiklar:


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 (15)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Jag skulle vilja göra ett makro som flyttas från en cell till nästa, steg för steg.
Denna kommentar minimerades av moderatoren på webbplatsen
Det är till hjälp tack. Men jag skulle vilja ha en formel som argument för funktionen "Range". Är detta tillåtet? Det jag skulle vilja göra är att låta användaren skriva in ett nummer i en dialogruta, sedan söka efter den första förekomsten av det numret i ett cellintervall och sedan hoppa markören till den cellen...
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Steve,
Jag kan tyvärr inte hjälpa dig med det.
Denna kommentar minimerades av moderatoren på webbplatsen
Hur skulle jag få markören att flytta från cell E6 till F8 när data har matats in i E6? Jag skulle vilja att markören ignorerar alla andra rader i E-kolumnen och omedelbart hoppar till E6.
Denna kommentar minimerades av moderatoren på webbplatsen
Förlåt, jag menar att skriva "hoppa direkt till F8"
Denna kommentar minimerades av moderatoren på webbplatsen
Hej James,
Vänligen prova koden nedan. Efter att data har matats in i E6, tryck på Tab-tangenten eller Enter-tangenten, så hoppar markören till F8 direkt.

Privata delarkivsförändring (ByVal-mål som område)

'Uppdaterad av Extendoffice 2020087

Dim tabArray som variant

Dim jag så länge

tabArray = Array("E6", "F8")

Application.ScreenUpdating = False

För i = LBound(tabArray) Till UBound(tabArray)

Om tabArray(i) = Target.Address(0, 0) Då

Om i = UBound(tabArray) Då

Me.Range(tabArray(LBound(tabArray))). Välj

annars

Me.Range(tabArray(i + 1)). Välj

End If

End If

Nästa jag

Application.ScreenUpdating = True

End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
Är det möjligt att flytta den aktiva cellen utan att trycka på en tangent på tangentbordet? Kan jag till exempel få cellen att flytta ner så fort cellen ovanför den är fylld? Jag letar efter antingen en funktion eller en VBA att köra när en cell är fylld. Så fort A3 har tecken i sig, finns det en VBA för att flytta ner den aktiva cellen till A4?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej John,
Jag är förvirrad på din fråga. Hur kan vi veta om cellen är klar med redigering?
Denna kommentar minimerades av moderatoren på webbplatsen
du skrev inte på F5 för koden, hur ska det köras genom att trycka på F5?
Denna kommentar minimerades av moderatoren på webbplatsen
Bagiaimana mengisi textbox pada form dengan memilih data di cell/sheet yg dipilih dgn kursor ?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Lelson,
Förlåt, jag förstår inte vad du menar. Skulle du ha något emot att ge en skärmdump av dina data? Eller försök att vara mer specifik om din fråga. Beklagar olägenheten.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej,

Kan du hjälpa till med följande VBA-kodförfrågan?

Blad 1 heter "Master Asset" med ytterligare 100 ark som heter "0001...0002...0003...0004 ~ 0100"

I något av vart och ett av arken "0001 ~ 0100"
Jag vill kunna välja cell A4 som redan innehåller texten "Back to Master Asset" och tryck sedan på enter, för att automatiskt hoppa tillbaka till cell J3 i "Master Asset"

Tack på förhand.
Andy C.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Andy Coghlan,
Jag kan inte hitta ett sätt att utlösa makrot med enter-tangenten just nu. Följande VBA-kod kan infoga samma hyperlänk i A4 av alla kalkylblad samtidigt. Efter att ha klickat på hyperlänken i A4 hoppar den till J3 i "Master Asset". Vänligen ge det ett försök.

Sub AddHyperlinks()
'Updated by Extendoffice 20220715
    Dim xRg, yRg As Range
    Set xRg = Worksheets("Master Asset").Range("J3")
    xStr = xRg.Address(External:=True)
    For Each Sh In Worksheets
        If Sh.Name <> "Sh.Name" Then
            Set yRg = Sh.Range("A4")
            yRg.Hyperlinks.Add anchor:=yRg, Address:="", SubAddress:=xStr, TextToDisplay:="Back to Master Asset"
        End If
    Next
End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
Sub jumpnext()
Range("F100"). Välj
End Sub

Vilken ändring måste jag göra så att den här koden kan användas på alla ark i arbetsboken samtidigt.

Hälsningar,
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Arvind,

Följande VBA-kod kan göra dig en tjänst. Vänligen ge det ett försök. Tack.
Obs: Du måste lägga in VBA-koden i Denna arbetsbok (kod) redaktör.
Sub jumpnext()
'Updated by Extendoffice 20230109
Set CurrWS = ActiveSheet
    For Each WS In ThisWorkbook.Worksheets
    WS.Activate
        WS.Range("F100").Select
    Next
    CurrWS.Activate
End Sub

https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/select-same-cell.png
Det finns inga kommentarer här ännu
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