Chcete-li změnit minimální / maximální hodnotu osy grafu pomocí vzorců v bodovém grafu v aplikaci Excel, můžete postupovat následovně:

Krok 1: Vyberte zdrojová data a kliknutím na ikonu přidejte bodový graf Vložte bodový (X, Y) a bublinový graf (nebo Rozptyl)> Rozptyl na Vložit Karta.

Krok 2: Najděte vedle zdrojových dat prázdný rozsah, říká Range E1: G4, přidejte tituly, jak je uvedeno níže:

Krok 3: Zjistěte minimální a maximální hodnotu pro osu X a osu Y pomocí vzorců:

(1) Maximální hodnota v ose X: V buňce F2 zadejte vzorec = ROUNDUP (MAX (A2: A18) +2,0), a stiskněte tlačítko vstoupit klíč;
(2) Minimální hodnota v ose X: V buňce F3 zadejte vzorec = ROUNDDOWN (MIN (A2: A18) -1,0), a stiskněte tlačítko vstoupit klíč.
(3) Hodnota zaškrtnutí v ose X: V buňce typu F4 1 nebo jinou hodnotu zaškrtnutí, kterou potřebujete;
(4) Maximální hodnota v ose Y: Do buňky G2 zadejte vzorec = ROUNDUP (MAX (B2: B18) +20,0), a stiskněte tlačítko vstoupit klíč;
(5) Minimální hodnota v ose Y: Do buňky G3 zadejte vzorec = ROUNDDOWN (MIN (B2: B18) -10,0), a stiskněte tlačítko vstoupit klíč;
(6) Hodnota zaškrtnutí v ose Y: V typu buňky G4 10 nebo jinou hodnotu zaškrtnutí, kterou potřebujete.

Poznámka: Ve výše uvedených vzorcích je A2: A18 sloupec Cena, na kterém vypočítáte měřítko osy x, B2: B18 je sloupec Hmotnost, na kterém vypočítáte měřítko osy y. A můžete upravit maximální nebo minimální hodnotu změnou čísel ve výše uvedených vzorcích podle vašich potřeb.

Krok 4: Vyberte bodový graf a klepněte pravým tlačítkem na název aktuálního listu na panelu karet List a vyberte ikonu Zobrazit kód z nabídky pravého tlačítka myši.

Krok 5: V úvodním okně Microsoft Visual Basic pro aplikace zkopírujte a vložte do okna následující kód:

VBA: Změňte minimální / maximální hodnoty osy grafu podle vzorců

Sub ScaleAxes()
With Application.ActiveChart.Axes(xlCategory, xlPrimary)
.MinimumScale = ActiveSheet.Range("F3").Value
.MaximumScale = ActiveSheet.Range("F2").Value
.MajorUnit = ActiveSheet.Range("F4").Value
End With
With Application.ActiveChart.Axes(xlValue, xlPrimary)
.MinimumScale = ActiveSheet.Range("G3").Value
.MaximumScale = ActiveSheet.Range("G2").Value
.MajorUnit = ActiveSheet.Range("G4").Value
End With
End Sub

Poznámka: F3 je minimální hodnota v ose X, F2 je maximální hodnota v ose X, F4 je hodnota tiku v ose X, G3 je minimální hodnota v ose Y, G2 je maximální hodnota v ose Y, G4 je hodnota tiku v ose Y a můžete je všechny změnit podle svých potřeb.

Krok 6: Spusťte tento VBA kliknutím na Běh tlačítko nebo stisknutím tlačítka F5 klíč.

Poté uvidíte, že minimální a maximální hodnota os X a osy Y jsou všechny změněny ve vybraném bodovém grafu najednou.

Snadno vyberte maximální / minimální hodnoty v každém řádku / sloupci nebo zadaném rozsahu v aplikaci Excel

Kutools pro Excel Vyberte buňky s maximální a minimální hodnotou vám pomůže snadno vybrat největší / nejmenší hodnoty nebo největší / nejmenší hodnoty vzorce z vybraného rozsahu v aplikaci Excel.