Pertahankan pemformatan bersyarat pada cut-paste


4

Saya memiliki beberapa data dari berbagai sumber yang saya coba antre untuk mendapatkan pegangan yang baik pada bidang mana yang mereka miliki bersama dan mana yang tidak. Untuk memudahkan melihat baris, saya menyiapkan aturan pemformatan bersyarat seperti ini:

Aturan:

=MOD(ROW(),2)=0

Berlaku untuk:

=$1:$1048576

Tindakan:

Turn Green

Ini sangat bagus ... sampai saya memotong dan menempel blok sel dalam satu kolom atau lainnya. "Intelligent cut-and-paste" Excel memecah segalanya, baik dengan aturan duplikasi, atau menghapus bagian dari wilayah, dan saya harus memperbaiki pemformatan bersyarat lagi. Bagaimana saya bisa memindahkan data tanpa mengubah aturan pemformatan coniditional?


Jawaban:


3

Saya berhasil menemukan satu solusi, saya mencatat makro ini:

Sub FomattingRules()
'
' FomattingRules Macro
'
' Keyboard Shortcut: Ctrl+e
'
    Cells.Select
    Cells.FormatConditions.Delete

    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=MOD(ROW(),2)=0"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorAccent3
        .TintAndShade = 0.599963377788629
    End With
    Selection.FormatConditions(1).StopIfTrue = False
End Sub

Secara teknis ini berfungsi tetapi saya lebih suka mencari solusi yang tidak mengharuskan saya untuk menekan ctrl + e sesering mungkin. Tapi itu lebih baik daripada mengatur ulang aturan dengan tangan, kurasa.


1

Tidak ada cara bagus untuk menyiasati ini. Saya merekomendasikan untuk melakukan Copy + Paste Values, lalu menghapus konten sel asli. Ini akan membuat semua pemformatan tidak berubah, tetapi berhasil memindahkan konten sel. Agak rumit, tetapi opsi Anda yang lain adalah mengulang Pemformatan Bersyarat setiap kali Anda memotong dan menempel. Anda memutuskan mana yang kurang berhasil.


Mengingat makro saya, saya pikir melakukan itu kurang berhasil. Tapi terima kasih sudah memastikan tidak ada cara yang baik untuk melakukan ini!
durron597

@ durron597 Saya setuju. Saya hanya ingin berbagi alternatif. Saran saya mempertahankan semua pemformatan bersyarat. Meskipun Anda benar-benar berfungsi untuk OP, orang lain mungkin tidak senang bahwa makro menghapus SEMUA pemformatan bersyarat, lalu hanya menerapkan yang dibangun ke makro. Hanya berbeda.
irockyoursocks

1

Tidak menjadi berbakat sebagai programmer seperti beberapa dari Anda, apa yang saya lakukan untuk menyelesaikan masalah adalah proses dua langkah pendek. pertama, saya membuat satu baris data tambahan yang terpisah dari bidang data yang saya kerjakan untuk proyek saya. Saya memastikan bahwa baris data ini memiliki pemformatan bersyarat yang benar yang ingin saya gunakan di seluruh bidang data. Untuk kenyamanan, saya memberi judul baris ini "Standar".

Selanjutnya, saya cukup memilih baris "Standar" dengan menyorot semua sel yang memiliki rumus yang ingin saya salin. Ketiga, saya menggunakan fungsi "format pelukis". Saya klik "format pelukis" (sudut kiri atas layar di bawah potong dan salin), dan kemudian sorot sel-sel yang saya ingin rumus agar sesuai dengan formula yang disimpan dalam baris "Standar".

Ini tidak otomatis, tetapi begitu Anda membuat garis "Standar" yang mempertahankan pemformatan bersyarat yang ingin Anda gunakan, itu sangat mudah diterapkan bahkan pada bidang data yang sangat besar hanya dalam dua langkah.


0

Saya menemukan cara baru untuk melakukan ini!

Anda mengunci sel yang diformat bersyarat. Saat Anda memotong dan menempel, pemformatan bersyarat tetap sama!


5
Selamat atas penemuan Anda. Bisakah Anda mengedit jawaban Anda untuk membagikan detail tentang cara mengunci sel yang diformat bersyarat?
fixer1234

Saya akan cenderung meningkatkan dan bahkan menerima jawaban ini jika Anda mengeditnya seperti yang dijelaskan oleh @ fixer1234
durron597

-1

Saya memiliki masalah yang sama dan menemukan sedikit solusi - mungkin dapat digunakan untuk Anda:

Alih-alih menyalin & menempel : tandai baris / kolom terakhir (atau rentang) dan gunakan tindakan Isi Turun / Isi Kanan (Pintasan: strg+ </ strg+ >). Kemudian formatnya juga ditransfer.

Ini juga bisa dilakukan dengan makro, yaitu untuk rentang baris:

Range("D2:D15").Select
Selection.FillDown

Alih-alih memotong & menempel : pilih baris atau kolom dan PINDAHKAN dengan mengarahkan kursor ke tepi pilihan (salib dengan kursor panah muncul) dan seret & lepaskan baris / kolom termasuk. menekan SHIFT. Maka itu bukan potong & tempel klasik, tetapi bergerak. Pemformatan kondisi harus dijaga.


1
FYI: Strg adalah Ctrl dalam tata letak Jerman. Dan pintasan untuk mengisi / mengisi kanan adalah masing
phuclv

1
Mengisi ke bawah / kanan bukan pengganti cut + paste yang baik, dan seret untuk memindahkan juga memindahkan pemformatan bersyarat saya
Dan Cecile

-1

Mengunci sel bukanlah solusi, teruji dan tidak berfungsi!

Jika Anda menempel menggunakan "Tempel Spesial - tanpa format", ini tidak akan merusak sel-sel yang sudah diformat, dan Anda tidak perlu khawatir tentang pengguna Anda harus menyalakan Macro untuk memperbaiki format. Perbaikan / penyelesaian yang mudah untuk solusi yang sudah digunakan!


Bagaimana ini berbeda dari jawaban irockyoursocks?
durron597

Ini berbeda karena saya menganjurkan penggunaan PASTE SPECIAL-No Formatting. yang tidak disebutkan irockyoursocks. RINCIAN!
user703269

-1

Ini sangat tidak elegan, tetapi juga sangat cepat, dan tampaknya bekerja dengan sempurna sejauh yang saya tahu ...

Salin sel Anda yang diformat bersyarat, tempelkan ke dokumen Word, salin sel dari dokumen Word, tempel ke sel Excel target.


Dengan menggunakan situs kami, Anda mengakui telah membaca dan memahami Kebijakan Cookie dan Kebijakan Privasi kami.
Licensed under cc by-sa 3.0 with attribution required.