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

Kako sklicevati na obliko in vrednost iz druge celice v Excelu?

Običajno uporabimo formulo = A1 za sklicevanje na celico A1 na drugo celico na delovnem listu. Toda to se lahko sklicuje samo na vrednost celice. Če se želite sklicevati na vrednost celice in njeno obliko, poskusite z drugo metodo. Ta članek ponuja dva načina, kako ga lahko dosežete.

Referenčna oblika in vrednost iz druge celice z lepljenjem povezane slike
Samodejna referenčna oblika in vrednost iz druge celice z VBA


Referenčna oblika in vrednost iz druge celice z lepljenjem povezane slike

Če se želite sklicevati na obliko in vrednost iz celice A1, naredite naslednje, da to storite.

1. Izberite celico (A1), na katero se želite sklicevati, nato jo s pritiskom na kopirajte Ctrl + C ključi.

2. Odprite celico, s katero želite povezati referenčno celico, jo kliknite z desno miškino tipko in izberite > Posebno lepljenje > Povezana slika. Oglejte si posnetek zaslona:

Zdaj se oblika in vrednost celice A1 sklicujeta na določeno celico. Format in vrednost teh dveh celic bosta sinhronizirana, kot je prikazano spodaj.


Samodejna referenčna oblika in vrednost iz druge celice z VBA

Z zagonom spodnjega skripta VBA se lahko samodejno sklicujete na obliko in vrednost iz druge celice.

1. Z desno miškino tipko kliknite jeziček lista, ki vsebuje celico, na katero se želite sklicevati, in nato kliknite Ogled kode v meniju z desnim klikom.

2. V pojavnem oknu Microsoft Visual za aplikacije okno, kopirajte in prilepite spodnjo kodo VBA v okno Code.

Koda VBA: Referenčna oblika in vrednost iz druge celice

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    With Worksheets("Sheet1")
        If .Range("A1").Value2 <> "" Then
            On Error Resume Next
            Range("A1").Copy (.Range("E2"))
        End If
    End With
End Sub

Opombe: V kodi je Sheet1 ime lista, ki vsebuje celico, ki jo potrebujete za sklicevanje na vrednost in obliko. A1 in E2 pomeni, da se bo celica A1 samodejno sklicevala na celico E2.

Od zdaj naprej, ko se vrednost spremeni v celici A1 lista 1, se njena vrednost in oblika takoj sklicujeta na celico E2.


Sorodni članki:

Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

  • Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
  • Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
  • Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
  • Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
  • Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
  • Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
  • Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
  • Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
zavihek kte 201905

Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
dno pisarniške mize
Komentarji (9)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
Živjo! Zelo kul!! Ali obstaja način za izvedbo prve možnosti v Google Spreadsheets?
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Julian,
Žal nismo testirali v Google preglednicah. Hvala za vaš komentar.
Ta komentar je moderator na spletnem mestu minimiziral
Kako to storim, če želim kopirati na drug list?
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Lil,
Če morate kopirati na drug list, uporabite spodnjo kodo VBA. Sheet1 je izvirni delovni list, Sheet3 je ciljni delovni list. Prosimo, da jih spremenite glede na vaše potrebe.

Zasebni pod delovni list_Change(ByVal Target As Excel.Range)
Z delovnimi listi ("List1")
Če .Range("A5").Value2 <> "" Potem
On Error Resume Next
Obseg("A5").Kopiraj (Delovni listi("List3").Razpon("E2"))
Konec Če
Končaj s
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Kako zagnati to kodo v excelu? Ali ga je treba zagnati na obeh delovnih listih? Ali je lahko natančno, kot korak za korakom?
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Jesse, zdravo, kot je omenjena zgornja koda, morate samo izpolniti kodo v oknu kode izvirnega delovnega lista, ko spremenite vrednost celice na izvirnem delovnem listu (v tem primeru A5 na listu 1), se bo koda zagnala samodejno. In celica A5 na listu 1 bo kopirana v E2 na listu 3.
Ta komentar je moderator na spletnem mestu minimiziral
Hello je naredil spodnjo kodo, vendar ni delovala
Zasebni pod delovni list_Change(ByVal Target As Excel.Range)
Z delovnimi listi ("Povzetek konkurenčne analize")
Če .Range("BI7").Value2 <> "" Potem
On Error Resume Next
Obseg("BI7").Kopiraj (Delovni listi("V globinskem pogledu - ADP").Razpon("E55"))
Konec Če
Končaj s
End Sub
Ta komentar je moderator na spletnem mestu minimiziral
Pozdravljeni, po dodajanju kode morate spremeniti delovni list "Povzetek konkurenčne analize", da omogočite VBA.
Ta komentar je moderator na spletnem mestu minimiziral
Ali lahko zrcalim prvih 5 stolpcev na vsakem novem listu? Podatke imam, samo želim, da se oblikovanje spremeni z vsemi listi, namesto da bi to moral storiti večkrat
Tu še ni objavljenih komentarjev
Prosimo, pustite komentarje v angleščini
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL