Cum să pătrate mai multe celule în Excel?
Uneori, trebuie să faceți celulele pătrate într-o foaie de lucru, astfel încât să puteți desena niște diagrame sau planuri de casă. Dar înălțimea rândului celulei și lățimea coloanei au unități diferite, astfel încât este dificil să setați atât înălțimea rândului, cât și lățimea coloanei în aceeași dimensiune. Iată câteva trucuri pentru a rezolva această problemă:
Păstrați mai multe celule glisând coloanele și marginile rândurilor
Păstrați mai multe celule cu cod VBA
Păstrați mai multe celule cu Kutools pentru Excel
Păstrați mai multe celule glisând coloanele și marginile rândurilor
Dacă doriți să faceți din fiecare celulă a unei foi de lucru un pătrat exact, vă rugăm să faceți următoarele:
1. presa Ctrl + A pentru a evidenția întreaga foaie de lucru.
2. Puneți cursorul la marginea dintre coloana A și coloana B, cursorul se va schimba în săgeată dublă neagră, glisați-o și veți vedea două numere precum „Lățime: 8.43 (64pixeli)”, glisați până la un număr de care aveți nevoie. În acest exemplu, voi trage în sus la „Lățime: 13.57 (100 pixeli)”.
3. Apoi puneți cursorul la marginea dintre rândul 1 și rândul 2. În timp ce cursorul se schimbă în săgeata dublă neagră, trageți-l, faceți ca numărul în pixeli să se potrivească cu numărul de pixeli pe care l-ați obținut la pasul 2, veți obține „Înălțimea 75.00 (100pixeli ) ".
Când eliberați mouse-ul, veți avea o foaie întreagă de celule pătrate cu 100 * 100 pixeli. Vedeți captura de ecran:
Păstrați mai multe celule cu cod VBA
Următorul cod VBA vă poate ajuta, de asemenea, să rezolvați această sarcină.
1. Selectați celulele pe care doriți să le faceți pătrate.
2. Clic Dezvoltator > Visual Basic, un nou Microsoft Visual Basic pentru aplicații fereastra va fi afișată, faceți clic pe Insera > Moduleși introduceți următorul cod în modul:
Sub MakeSquare ()
Dim WPChar Ca Dublu
Dim Dinch As Double
Dim Temp As String
Temp = InputBox ("Înălțimea și lățimea în inci?")
DInch = Val (Temp)
Dacă DInch> 0 și DInch <2.5 atunci
Pentru fiecare c În ActiveWindow.RangeSelection.Columns
WPChar = c.Width / c.ColumnWidth
c.ColumnWidth = ((DInch * 72) / WPChar)
Următorul c
Pentru fiecare r În ActiveWindow.RangeSelection.Rows
r.RowHeight = (DInch * 72)
Următorul r
Final, dacă
End Sub
3. Apoi apasa 
pentru a rula codul. Și o casetă de prompt va apărea pentru a vă reaminti că introduceți numărul de care aveți nevoie. Vedeți captura de ecran:
4. Apoi apasa OK. Iar celulele selectate au fost schimbate în celule pătrate.
notițe: În codul de mai sus, puteți introduce numărul între 0 și 2.5 țoli, dacă numărul introdus este egal cu 0 sau mai mic decât 0 sau numărul egal cu 2.5 sau mai mare decât 2.5, acest cod nu va fi disponibil.
Păstrați mai multe celule cu Kutools pentru Excel
Codul de mai sus are unele limitări și folosește doar inch ca unitate. Dacă doriți să creați un pătrat de 5 * 5 cm în excel, cum ați putea face?
Kutools pentru Excel: cu mai mult de 300 de programe de completare Excel la îndemână, încercați fără limitări în 30 de zile. Ia-l acum
Dacă ați instalat Kutools pentru Excel, această problemă va fi rezolvată cu ușurință.
1. Evidențiați celulele pe care doriți să le faceți pătrate。
2. Clic Kutools > Convertor de interval > Ajustați dimensiunea celulei, vezi captura de ecran:
3. În Ajustați dimensiunea celulei caseta de dialog, specificați tipul de unire. Și apoi introduceți înălțimea rândului și lățimea coloanei ca același număr de care aveți nevoie. Vedeți captura de ecran:
4. Clic OK or Aplică, celulele selectate au fost schimbate în pătrate cu 2 * 2 cm.
notițe: Puteți seta alte unități, cum ar fi Lira, Inchi sau Pixeli, după cum doriți.
Faceți clic pentru a afla mai multe despre această funcție Ajustare dimensiune celulă.
Legate de articole:
- Cum se setează dimensiunea celulei în cm (centimetri) în Excel?
- Setați lățimea coloanei și înălțimea rândului pentru un interval
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
