Kako razdeliti obseg celic s številom v Excelu?

Včasih bomo morda morali hitro spremeniti vrsto celic v Excelu. Na primer, imam vrsto celic, ki vsebujejo cene skupine izdelkov, in želim deliti vse cene z 2, zdaj pa se pojavlja vprašanje, kako lahko na hitro razdelim obseg celic s številom?

Razdelite obseg celic s številom s funkcijo Paste Special
Razpon celic razdelite s številom s kodo VBA
S Kutools za Excel hitro razdelite obseg celic s številom

Razdelite obseg celic s številom s funkcijo Paste Special

Na primer, vse celice bom razdelil s številko 15 z uporabo Posebno lepljenje funkcije Excela, lahko to nalogo izvedete z naslednjimi koraki:

1. Številko delilnika, na primer 15, vstavite v prazno celico in jo kopirajte.

2. Označite obseg, ki ga želite razdeliti na 15, in z desno miškino tipko kliknite, izberite Posebno lepljenje V meniju.

3. V Ljubljani Prilepite Special v pogovornem oknu kliknite vsi možnost v testenine izberete Razdelite možnost v operacija in na koncu kliknite OK gumb.

4. Izbrišite številko 15, ki ste jo vnesli že prej.

Zdaj je obseg celic razdeljen na 15 v razsutem stanju. Oglejte si posnetek zaslona:

Razpon celic razdelite s številom s kodo VBA

S kodo VBA lahko celice obsega tudi samodejno razdelite na število.

1. Izberite obseg, za katerega želite, da se deli s številom.

2. klik Razvojni > Visual Basic, Novo Microsoft Visual Basic za aplikacije odpre se okno, kliknite Vstavi > Moduliin nato v polje vnesite naslednjo kodo Moduli:

VBA: Razdelite obseg celic s številom.

Sub DivisionNum()
'Updateby20140128
Dim Rng As Range
Dim WorkRng As Range
Dim xNum As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xNum = Application.InputBox("Division num", xTitleId, Type:=1)
For Each Rng In WorkRng
    Rng.Value = Rng.Value / xNum
Next
End Sub

3. Nato kliknite  za zagon kode. V pojavnem pogovornem oknu izberite obseg s številkami, ki jih želite deliti z določeno številko, in nato kliknite OK . Oglejte si posnetek zaslona:

4. V drugo pojavno pogovorno okno vnesite številko delilca in kliknite gumb V redu. Oglejte si posnetek zaslona:

Zdaj so vse številke v izbranem obsegu deljene s številko 15.

S Kutools za Excel hitro razdelite obseg celic s številom

Morda je koda VBA za vas nekoliko težka, ali obstaja enostavna in hitra metoda za reševanje tega dela?

1. Izberite obseg s številkami, ki jih želite deliti z določeno številko. in nato kliknite Kutools > Več > operacija, glej posnetek zaslona:

3. V Ljubljani Operacijska orodja pogovorno okno, izberite delitev v operacija vnesite številko delitelja, kot je 15 v Operand škatla. Rezultate pa lahko vidite na predogled Podokno. In končno kliknite OK or Uporabi . Oglejte si posnetek zaslona:

Opombe: Če želite ustvariti tudi formule, preverite Ustvari formule možnost. Če izbrane celice vključujejo formule in izračunanih rezultatov formule ne želite deliti, preverite Preskoči celice formule možnost.

S Kutools za Excel hitro razdelite obseg celic s številom

Sorodni članki:

• Spremenite vrednosti v obsegu celic
• Dodajte vrednosti v več celic
• Naredite eksponentni izračun za vrsto celic
• Celice obsega pomnožite s številom
• Zaokrožite vrsto celic
• V obsegu celic v Excelu odštejemo število

---

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.

Preberite več ... Brezplačen prenos... Nakup ... 

---

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!

Preberite več ... Brezplačen prenos... Nakup ...