Hoppa till huvudinnehåll
 

 Hur skapar man rullgardinsmeny men visar olika värden i Excel?

Författare: Xiaoyang Senast ändrad: 2022-07-25

I Excel-kalkylblad kan vi snabbt skapa en rullgardinslista med funktionen Data Validation, men har du någonsin försökt visa ett annat värde när du klickar på rullgardinsmenyn? Till exempel har jag följande två kolumndata i kolumn A och kolumn B, nu måste jag skapa en rullgardinsmeny med värdena i kolumnen Namn, men när jag väljer namnet från den skapade rullgardinslistan, motsvarar värdet i kolumnen Antal visas som följande skärmdump visas. Denna artikel kommer att presentera detaljerna för att lösa denna uppgift.

listrutor för doc olika värden 1

Skapa rullgardinsmeny men visa annat värde i rullgardinsmenyn


Skapa rullgardinsmeny men visa annat värde i rullgardinsmenyn

För att slutföra denna uppgift, gör följande steg för steg:

1. Skapa ett intervallnamn för de cellvärden som du vill använda i listrutan, i det här exemplet kommer jag att ange rullgardinsmenyn i Namn Box, och tryck sedan på ange nyckel, se skärmdump:

listrutor för doc olika värden 2

2. Välj sedan celler där du vill infoga listrutan och klicka Data > Datagransknings > Datagransknings, se skärmdump:

listrutor för doc olika värden 3

3. I Datagransknings under dialogrutan Inställningar fliken, välj Lista från Tillåt och klicka sedan på listrutor för doc olika värden 5 för att välja namnlistan som du vill använda som rullgardinsvärden i Källa textruta. Se skärmdump:

listrutor för doc olika värden 4

4. När du har infogat rullgardinsmenyn, vänligen högerklicka på fliken aktivt ark och välj Visa kod från snabbmenyn och i den öppnade Microsoft Visual Basic för applikationer fönster, kopiera och klistra in följande kod i den tomma modulen:

VBA-kod: Visa annat värde från listrutan:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    selectedNa = Target.Value
    If Target.Column = 5 Then
        selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)
        If Not IsError(selectedNum) Then
            Target.Value = selectedNum
        End If
    End If
End Sub

listrutor för doc olika värden 6

Anmärkningar: I ovanstående kod, numret 5 inom Om Target.Column = 5 Då skriptet är det kolumnummer som din rullgardinsmeny hittade,, "falla ner" i denna selectedNum = Application.VLookup (selectedNa, ActiveSheet.Range ("dropdown"), 2, False) kod är det intervallnamn du skapade i steg 1. Du kan ändra dem efter behov.

5. Spara och stäng sedan den här koden, när du väljer ett objekt i listrutan visas ett relativt annat värde i samma cell, se skärmdump:

listrutor för doc olika värden 7


Demo: Skapa rullgardinsmeny men visa olika värden i Excel

Kutools för Excel: med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. Ladda ner och testa gratis nu!

 

Bästa kontorsproduktivitetsverktyg

🤖 Kutools AI Aide: Revolutionera dataanalys baserat på: Intelligent utförande   |  Generera kod  |  Skapa anpassade formler  |  Analysera data och generera diagram  |  Anropa Kutools funktioner.
Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50+ Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...


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!