պայմանական ձևաչափ՝ բանաձևով

Hi այնտեղ,

Խնդրում ենք դիմել հոդվածին ձեր պատասխանը գտնելու համար. https://www.extendoffice.com/documents/excel/4033-excel-exclude-zero-from-min.html

Հարցման մասին՝ «ընդգծիր արժեքը», ո՞ր արժեքն ես ուզում ընդգծել։

Amanda

Բարև հարգելի Ամանդա
Տանկեր իմ խնդրանքը կարդալու համար և շատ շնորհակալություն ձեր սիրալիր պատասխանի համար
Ես ունեմ ավելի քան 5000 տող տվյալների աղյուսակ…
Այս աղյուսակում յուրաքանչյուր 7-ից 11 տող ունի մեկ թիվ, որը միավորում է A սյունակի բջիջները:
Յուրաքանչյուր հատված 1 տողի համարով, որը պարունակում է մի քանի վաճառողների տվյալներ մեկ ապրանքի մասին, որոնցից յուրաքանչյուրն ունի իր գինը, և ինձ անհրաժեշտ է, որ յուրաքանչյուր բաժնում իմ ամսաթիվը դասավորվի տողերի վերևում գտնվող ցանկացած վաճառողի ցածր գնով😊
Ինչպես տեսնում եք, ես ունեմ 2 խնդրանք.
1. տեսակավորել տվյալները իմ տվյալների յուրաքանչյուր մասում իրենց ամենացածր գնով բաժնում,
2. ընդգծել ամենացածր գինը առաջին շարքում
Ես երեկ լուծեցի երկրորդ խնդրանքս, բայց առաջինիս պատասխան չգտա։
Ես շնորհակալ կլինեմ, եթե կարողանաք լուծել իմ խնդիրը :)
Ցավոք, ես չկարողացա վերբեռնել իմ սեղանի պատկերը:(

ահա իմ սեղանի մասնակի հատվածի նկարը
https://drive.google.com/file/d/1MqdJo_Xa7nilbT8YMZiJIncNfApyuOd7/view?usp=sharing

Hi այնտեղ,

Շնորհակալություն նկարի համար, դա օգնում է: Այնուամենայնիվ, մենք չենք հասկանում նկարի լեզուն:

Այսպիսով, կարո՞ղ եք նշել, արդյոք ձեր նշած յուրաքանչյուր բաժինը միջակայքներն են.
P12: U12; P19: U19; ...
OR
P12:P18; P19: P25; ...

Բարև և շատ շնորհակալություն ուշադրության համար հարգելի Ամանդա:
Առաջին հերթին, լեզուն, որը ես օգտագործել եմ այս աղյուսակում, ՖԱՐՍՆԵՐ են:
Ի հավելումն ձեր երկրորդ հարցի.
Եթե ​​հասկանում եմ, թե ինչ նկատի ունեք, ես ուզում եմ տեսակավորել բոլոր տվյալները D12:AH18 տիրույթում` հիմնվելով Q12:Q18 բջիջի նվազագույն արժեքի վրա, որը պետք է դուրս գա թիվ 1 բաժնի տողի վերևում և նույնը` մեկ այլ բաժիններում: ինչպես, օրինակ, No.2-ը բաժին No.712-ին, և նաև ինձ անհրաժեշտ է այս տեսակավորումից հետո, երբ Q բջիջների նվազագույն քանակը դուրս է գալիս տողի հատվածի վերևում, այն ցուցադրվում է ֆոնի վրա դեղին գույնով, ինչպես նաև ցուցադրվում է «I» բջիջի վաճառողի անունը: նույն դեղին ֆոնը նույնպես:
Հուսով եմ, որ ճիշտ եմ բացատրել իմ նպատակն ու խնդրանքը։
Նաև, եթե պետք է, ասեք, որ ավելի շատ նկարներ տեղադրեմ։
Նախապես շնորհակալություն ձեր պատասխանի համար:

Մեջբերված է JavidP չորեքշաբթի, 18 մայիսի 2022 թ

Ես ուզում եմ տեսակավորել բոլոր տվյալները D12:AH18 միջակայքում՝ հիմնվելով Q12:Q18 բջիջի նվազագույն արժեքի վրա, որը պետք է դուրս գա թիվ 1 հատվածի տողի վերևում և այդպես շարունակ այլ բաժիններում, օրինակ՝ No.2-ից մինչև բաժինը: No.712 և նաև ինձ անհրաժեշտ է այս տեսակավորումից հետո, երբ Q բջիջների նվազագույն քանակը դուրս է գալիս տողի հատվածի վերևում, այն ցուցադրվում է դեղին գույնով ֆոնին, ինչպես նաև «I» բջիջի վաճառողի անունը ցույց է տալիս նույն դեղին ֆոնը:

Այսպիսով, 1-ին բաժնի համար դուք ցանկանում եք տեսակավորել 12-18 տողերը՝ հիմնվելով Q12:Q18-ի արժեքների վրա՝ ամենափոքրից մինչև ամենամեծը;
2-րդ բաժնի համար, ....

Իսկ Q բջիջների նվազագույն քանակը և վաճառողի անունը «I» բջիջում նրանք նույն շարքում են: Ճի՞շտ հասկացա։

Բարև սիրելի Ամանդա :)
Ճիշտ է:)

Hi այնտեղ,

Մենք ստեղծել ենք VBA կոդ, որը կօգնի ձեզ դասավորել տողերը բաժին առ բաժին, խնդրում ենք տեսնել ստորև.

Sub ExtendOffice_Sort()

Dim xExtendRg, xOfficeSRgC As Range

Dim xRg As Range

Dim xRangeAddress As String

Dim xNum, xCSNum, xCENum, xRSNum, xRSNum2, xRENum As Integer

Dim xRCount As Integer

Dim xBol, xBolWS As Boolean

Dim xStr1, xStr2 As String

Dim xWSh As Worksheet

Dim xSortColumn As Integer

On Error Resume Next

Set xExtendRg = Application.InputBox("Please select the range with data to be sorted:", "ExtendOffice - Kutools for Excel", , , , , , 8)

If xExtendRg Is Nothing Then Exit Sub

Set xOfficeSRgC = Application.InputBox("Please select the column with values to be sorted from smallest to largest:", "ExtendOffice - Kutools for Excel", , , , , , 8)

If xOfficeSRgC Is Nothing Then Exit Sub

xNum = Application.InputBox("Please enter a number of rows to be sorted in a section:", "ExtendOffice - Kutools for Excel", , , , , , 1)



Set xRg = xExtendRg



Set xWSh = xRg.Worksheet



xWSh.Activate

xSortColumn = xOfficeSRgC.Column

xRCount = xRg.Rows.Count

xCSNum = xRg.Column

xCENum = xCSNum + xRg.Columns.Count - 1

xRSNum = xRg.Row

xRENum = xRSNum + xRCount - 1

xRSNum2 = xRSNum

xRSNum = (xRSNum + xNum) - 1

xBol = True

xBolWS = Application.ScreenUpdating

Application.ScreenUpdating = False

Do While xBol

xStr1 = xWSh.Cells(xRSNum2, xCSNum).Address & ":" & xWSh.Cells(xRSNum, xCENum).Address

xStr2 = xWSh.Cells(xRSNum2, xSortColumn).Address & ":" & xWSh.Cells(xRSNum, xSortColumn).Address

'Debug.Print xStr1 & " - " & xStr2



    xWSh.Sort.SortFields.Clear

    xWSh.Sort.SortFields.Add Key:=Range(xStr2) _

        , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

    With xWSh.Sort

        .SetRange Range(xStr1)

        .Header = xlGuess

        .MatchCase = False

        .Orientation = xlTopToBottom

        .SortMethod = xlPinYin

        .Apply

    End With

    xWSh.Sort.SortFields.Clear



If (xRSNum + xNum) >= xRENum Then

    If xRSNum = xRENum Then

        xBol = False

    Else

        xRSNum2 = xRSNum + 1

        xRSNum = xRENum

    End If

Else

    xRSNum2 = xRSNum + 1

    xRSNum = (xRSNum + xNum)

End If

Loop



Application.ScreenUpdating = xBolWS



End Sub

Եվ կներեք, որ վերը նշված կոդը չի ընդգծում «I» բջիջի Q բջիջների և վաճառողի անունը նվազագույնը, քանի որ մենք վերջերս զբաղված էինք մեր արտադրանքի վրա աշխատելով:
Հուսով եմ հասկանում եք:

Amanda

Կրկին բարև սիրելի Ամանդա :)
Շնորհակալություն:
Ես փորձարկեցի ձեր կոդը և, իհարկե, այն լավ է աշխատում:
այժմ ես պետք է այն աշխատեմ մոտ 712 անգամ իմ սեղանի վրա և ամեն անգամ ընտրեմ տվյալներ
Հուսով եմ, որ կստանամ ավելի շատ կոդ իմ հաջորդ խնդրանքը հնարավորինս շուտ կատարելու համար:
Կրկին շնորհակալություն և հաջողություն:

Մեջբերված է JavidP ուրբաթ, 20 մայիսի 2022թ

այժմ ես պետք է այն աշխատեմ մոտ 712 անգամ իմ սեղանի վրա և ամեն անգամ ընտրեմ տվյալներ

Պետք չէ այն գործարկել 712 անգամ:

Երբ երկխոսություն է հայտնվում, ասելով
«Խնդրում ենք ընտրել տեսակավորվող տվյալների միջակայքը» > դուք պարզապես ընտրում եք բոլոր տվյալները, որոնք պետք է տեսակավորվեն՝ 1-ից մինչև 712 բաժիններում:
«Խնդրում ենք ընտրել արժեքներով սյունակը, որը պետք է տեսակավորվի ամենափոքրից դեպի ամենամեծը» > Ձեր դեպքում ընտրեք Q սյունակը:
«Խնդրում ենք մուտքագրել մի շարք տողեր, որոնք պետք է տեսակավորվեն բաժնում.» > Մուտքագրեք «7» ձեր դեպքում:

ԼԱՎ. իսկ եթե որոշ բաժիններ ունենան 7 տողից ավելի կամ պակաս տվյալներ?!

Մեջբերված է JavidP երեքշաբթի, 17 մայիսի 2022 թ

Բարև հարգելի Ամանդա
Տանկեր իմ խնդրանքը կարդալու համար և շատ շնորհակալություն ձեր սիրալիր պատասխանի համար
Ես ունեմ ավելի քան 5000 տող տվյալների աղյուսակ…
Այս աղյուսակում յուրաքանչյուր 7-ից 11 տող ունի մեկ թիվ, որը միավորում է A սյունակի բջիջները:
Յուրաքանչյուր հատված 1 տողի համարով, որը պարունակում է մի քանի վաճառողների տվյալներ մեկ ապրանքի մասին, որոնցից յուրաքանչյուրն ունի իր գինը, և ինձ անհրաժեշտ է, որ յուրաքանչյուր բաժնում իմ ամսաթիվը դասավորվի տողերի վերևում գտնվող ցանկացած վաճառողի ցածր գնով😊
Ինչպես տեսնում եք, ես ունեմ 2 խնդրանք.
1. տեսակավորել տվյալները իմ տվյալների յուրաքանչյուր մասում իրենց ամենացածր գնով բաժնում,
2. ընդգծել ամենացածր գինը առաջին շարքում
Ես երեկ լուծեցի երկրորդ խնդրանքս, բայց առաջինիս պատասխան չգտա։
Ես շնորհակալ կլինեմ, եթե կարողանաք լուծել իմ խնդիրը :)
Ցավոք, ես չկարողացա վերբեռնել իմ սեղանի պատկերը:(

Ես կարծում էի, որ ձեր բոլոր բաժինները նույն թվով տողեր են
Եթե ​​ոչ, ուրեմն....