Bukan rahsia lagi bahawa kebanyakan pengguna Excel, apabila membuat jadual pada helaian, memikirkan terlebih dahulu tentang keselesaan dan kemudahan mereka sendiri. Beginilah bagaimana jadual yang cantik, berwarna-warni dan rumit dengan "pengepala" kompleks dilahirkan, yang, pada masa yang sama, tidak boleh ditapis atau diisih sama sekali, dan lebih baik tidak memikirkan laporan automatik dengan jadual pangsi sama sekali.
Cepat atau lambat, pengguna jadual sedemikian membuat kesimpulan bahawa "ia mungkin tidak begitu cantik, tetapi ia boleh berfungsi" dan mula memudahkan reka bentuk mejanya, membawanya selaras dengan cadangan klasik:
- pengepala satu baris yang ringkas, di mana setiap lajur akan mempunyai nama uniknya sendiri (nama medan)
- satu baris – satu operasi selesai (urus niaga, penjualan, pengeposan, projek, dll.)
- tiada sel bercantum
- tanpa patah dalam bentuk baris dan lajur kosong
Tetapi jika anda membuat pengepala satu baris daripada satu berbilang peringkat atau membahagikan satu lajur kepada beberapa, ia agak mudah, maka pembinaan semula jadual boleh mengambil banyak masa (terutama pada saiz yang besar). Ini bermakna keadaan berikut:
| Of |  | do |  |
Dari segi pangkalan data, jadual yang betul biasanya dipanggil rata (rata) – mengikut jadual sedemikian adalah yang terbaik untuk membina laporan jadual pangsi (jadual pangsi) dan menjalankan analisis.
Anda boleh menukar jadual dua dimensi kepada jadual rata menggunakan makro mudah. Buka Editor Visual Basic melalui tab Pembangun – Visual Basic (Pembangun — Editor Visual Basic) atau pintasan papan kekunci Alt+F11. Masukkan modul baharu (Sisipan – Modul) dan salin teks makro ini di sana:
Sub Pereka Semula() Malapkan i As Long Dim hc Sebagai Integer, hr Sebagai Integer Dim ns As Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько столбдип столбдов?" Palsu i = 1 Set inpdata = Set Pemilihan ns = Lembaran Kerja.Tambah Untuk r = (hr + 1) Kepada inpdata.Rows.Count For c = (hc + 1) To inpdata.Columns.Count For j = 1 To hc ns. Sel(i, j) = inpdata.Sel(r, j) Seterusnya j Untuk k = 1 Hingga jam ns.Sel(i, j + k - 1) = inpdata.Sel(k, c) Seterusnya k ns.Sel( i, j + k - 1) = inpdata.Sel(r, c) i = i + 1 Seterusnya c Seterusnya r End Sub Anda kemudian boleh menutup editor VBA dan kembali ke Excel. Kini kita boleh memilih jadual asal (sepenuhnya, dengan pengepala dan lajur pertama dengan bulan) dan menjalankan makro kita melalui Pembangun – Makro (Pembangun — Makro) atau kombinasi menekan Alt+F8.
Makro akan memasukkan helaian baharu ke dalam buku dan mencipta versi baharu jadual yang dipilih di atasnya yang telah dibina semula. Anda boleh bekerja dengan jadual sedemikian "sepenuhnya", menggunakan keseluruhan senjata alat Excel untuk memproses dan menganalisis senarai besar.
- Apakah makro, tempat untuk memasukkan kod makro dalam VBA, cara menggunakannya
- Mencipta Laporan dengan Jadual Pangsi
- Alat untuk mereka bentuk semula jadual XNUMXD kepada yang rata daripada alat tambah PLEX