Wie teile ich einen Zellenbereich in Excel durch eine Zahl?

Manchmal müssen wir möglicherweise einen Zellbereich in Excel schnell ändern. Zum Beispiel habe ich eine Reihe von Zellen, die die Preise einer Gruppe von Produkten enthalten, und ich möchte alle Preise durch 2 teilen, und jetzt kommt die Frage, wie ich eine Reihe von Zellen schnell durch eine Zahl teilen kann.

Teilen Sie einen Zellbereich durch eine Zahl mit der Funktion Einfügen Spezial
Teilen Sie einen Zellbereich durch eine Zahl mit VBA-Code
Teilen Sie mit Kutools for Excel schnell einen Zellbereich durch eine Zahl

Teilen Sie einen Zellbereich durch eine Zahl mit der Funktion Einfügen Spezial

Zum Beispiel werde ich alle Zellen durch eine Zahl 15 teilen, indem ich benutze Einfügen Mit der Excel-Funktion können Sie diese Aufgabe mit den folgenden Schritten ausführen:

1. Fügen Sie die Divisornummer wie 15 in eine leere Zelle ein und kopieren Sie sie.

2. Markieren Sie den Bereich, in dem Sie alle Zahlen durch 15 teilen möchten, und klicken Sie mit der rechten Maustaste Einfügen aus dem Menü.

3. In dem Spezial einfügen PasteKlicken Sie im Dialogfeld auf Alles Option in der Pasta Abschnitt, wählen Sie die Teilen Option in der Produktion Klicken Sie abschließend auf OK .

4. Löschen Sie die zuvor eingegebene Nummer 15.

Jetzt wurde der Zellbereich durch 15 in Masse geteilt. Siehe Screenshot:

Teilen Sie einen Zellbereich durch eine Zahl mit VBA-Code

Mit dem VBA-Code können Sie auch Bereichszellen automatisch durch eine Zahl teilen.

1. Wählen Sie den Bereich aus, den Sie durch eine Zahl teilen möchten.

2 Klicken Entwickler:in / Unternehmen > Visual BasicEin neuer Microsoft Visual Basic für Anwendungen Fenster wird angezeigt, klicken Sie Insert > Modul, und geben Sie dann den folgenden Code in das Feld ein Modul:

VBA: Teilen Sie einen Zellbereich durch eine Zahl.

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. Dann klick  Schaltfläche, um den Code auszuführen. Wählen Sie in einem Popup-Dialogfeld den Bereich mit den Zahlen aus, die Sie durch eine bestimmte Zahl teilen möchten, und klicken Sie dann auf OK Taste. Siehe Screenshot:

4. Geben Sie im zweiten Dialogfeld die Divisornummer ein und klicken Sie auf die Schaltfläche OK. Siehe Screenshot:

Jetzt werden alle Zahlen im ausgewählten Bereich durch die Zahl 15 geteilt.

Teilen Sie mit Kutools for Excel schnell einen Zellbereich durch eine Zahl

Vielleicht ist der VBA-Code für Sie etwas schwierig. Gibt es eine einfache und schnelle Methode, um mit dieser Arbeit umzugehen?

1. Wählen Sie den Bereich mit Zahlen aus, die Sie durch eine bestimmte Zahl teilen möchten. und dann klicken Kutoolen > Mehr > Produktion, siehe Screenshot:

3. In dem Bedienwerkzeuge Dialogfeld auswählen Division der Produktion Geben Sie im Feld die Divisornummer ein, z 15 der Operand Box. Und Sie können die Ergebnisse aus dem sehen Vorschau Feld. Und zum Schluss klicken Sie auf OK or Hinzufügen Taste. Siehe Screenshot:

Hinweis: Wenn Sie auch Formeln erstellen möchten, überprüfen Sie dies bitte Formeln erstellen Möglichkeit. Wenn die ausgewählten Zellen Formeln enthalten und Sie die berechneten Ergebnisse der Formel nicht teilen möchten, überprüfen Sie dies bitte Formelzellen überspringen .

Teilen Sie mit Kutools for Excel schnell einen Zellbereich durch eine Zahl

In Verbindung stehende Artikel:

• Ändern Sie die Werte in einem Zellbereich
• Fügen Sie mehreren Zellen Werte hinzu
• Führen Sie eine Exponentialberechnung für einen Zellbereich durch
• Multiplizieren Sie eine Bereichszelle mit einer Zahl
• Runden Sie eine Reihe von Zellen ab
• Subtrahieren Sie eine Zahl von einer Reihe von Zellen in Excel

---

Die besten Tools für die Office-Produktivität

Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%

• Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
• Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
• Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
• Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
• Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
• Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
• Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
• Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
• Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2021 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. 30-tägige kostenlose Testversion mit allen Funktionen. 60 Tage Geld-zurück-Garantie.

Lesen Sie mehr... Kostenfreier Download... Kauf... 

---

Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

• Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
• Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
• Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!

Lesen Sie mehr... Kostenfreier Download... Kauf...