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.

Läs mer... Gratis nedladdning... Köp...

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!

Läs mer... Gratis nedladdning... Köp...

Kommentarer (15)

Inga betyg än. Bli först med att betygsätta!

Kris

ca 4 år sedan

#26075

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.

Svara

Steve

ca 3 år sedan

#28689

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...

Svara

kristall Steve

ca 3 år sedan

#28690

Denna kommentar minimerades av moderatoren på webbplatsen

Hej Steve,
Jag kan tyvärr inte hjälpa dig med det.

Svara

Report

james

ca 2 år sedan

#33714

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.

Svara

James

ca 2 år sedan

#33715

Denna kommentar minimerades av moderatoren på webbplatsen

Förlåt, jag menar att skriva "hoppa direkt till F8"

Svara

kristall James

ca 2 år sedan

#33716

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

Svara

Report

John

ca 2 år sedan

#33898

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?

Svara

kristall John

ca 2 år sedan

#33899

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?

Svara

Report

Shahd

ungefär 1 år sedan

#35248

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?

Svara

nelson

om 8 månader sedan

#38119

Denna kommentar minimerades av moderatoren på webbplatsen

Bagiaimana mengisi textbox pada form dengan memilih data di cell/sheet yg dipilih dgn kursor ?

Svara

kristall nelson

om 8 månader sedan

#38237

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.

Svara

Report

Andy Coghlan

om 7 månader sedan

#38838

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.

Svara

kristall Andy Coghlan

om 6 månader sedan

#38919

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

Svara

Report

arvind

ungefär 1 månad sen

#42412

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,

Svara

kristall arvind

ungefär två veckor sedan

#42444

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