Note: The other languages of the website are Google-translated. Back to English

Sut i popio blwch negeseuon os yw cell yn fwy neu'n llai na gwerth penodol yn Excel?

Os yw cell yn fwy neu'n llai na chell arall, mae angen i mi popio blwch neges i rybuddio yn Excel. Sut i ddatrys y broblem hon yn Excel? Yr erthygl hon, byddaf yn siarad am rai codau ar gyfer delio ag ef.

Codwch flwch neges os yw gwerth celloedd mewn colofn yn fwy neu'n llai na chell arall

Codwch flwch neges os yw gwerth cell mewn cell yn fwy neu'n llai na chell arall


Codwch flwch neges os yw gwerth celloedd mewn colofn yn fwy neu'n llai na chell arall

Gan dybio, mae gen i rif penodol 100 yng nghell A1, nawr, pan fydd y nifer a gofnodir yng ngholofn D yn fwy na 100 yng nghell A1, dylid rhoi blwch neges allan i atgoffa'r defnyddiwr.

Yma, gall y cod VBA isod eich helpu i'w orffen, gwnewch y camau canlynol:

1. Ewch i'r daflen waith rydych chi am ei defnyddio.

2. De-gliciwch y tab dalen, a dewis Gweld y Cod o'r ddewislen cyd-destun, yn y popped allan Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, copïwch a gludwch y cod canlynol i mewn i ffenestr y Modiwl gwag, gweler y screenshot:

Cod VBA: popiwch flwch neges os yw gwerth celloedd mewn colofn yn fwy neu'n llai na chell

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
Dim xC As String
Dim xWSName As String
Dim xA As String
xC = "D:D"
xWSName = "Sheet1"
xA = "A1"
    If Intersect(Target, Range("D:D")) Is Nothing Then Exit Sub
    If IsEmpty(Target) Then Exit Sub
    xNum = (Sheets(xWSName).Range(xA).Value)
    If (Target.Value) > (Sheets(xWSName).Range(xA).Value) Then
        MsgBox Prompt:="The entered number is greater than cell A1, please enter again! ", Title:="Kutools for Excel"
    End If
End Sub

Nodyn: Yn y cod uchod, Sheet1 yw eich taflen waith rydych chi am ei defnyddio; A1 yw'r gwerth cell rydych chi am gymharu ag ef; D: D. yw'r golofn rydych chi am ei chymharu â chell A1.

3. Yna, arbed a chau ffenestr y cod, o hyn ymlaen, bydd blwch neges yn cael ei popio allan os byddwch chi'n nodi rhif yng ngholofn D sy'n fwy na 100, gweler y screenshot:


Codwch flwch neges os yw gwerth cell mewn cell yn fwy neu'n llai na chell arall

Os ydych chi eisiau i flwch neges gael ei popio allan pan fydd gwerth cell yn fwy neu'n llai na chell arall, cymhwyswch y cod isod:

1. Ewch i'r daflen waith rydych chi am ei defnyddio.

2. De-gliciwch y tab dalen, a dewis Gweld y Cod o'r ddewislen cyd-destun, yn y popped allan Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, copïwch a gludwch y cod canlynol i mewn i ffenestr y Modiwl gwag, gweler y screenshot:

Cod VBA: popiwch flwch neges os yw gwerth y gell yn fwy neu'n llai na chell

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
On Error GoTo ExitSub
Dim One As Long
Dim Two As Long
One = Range("A1").Value
Two = Range("D1").Value
If Not (Application.Intersect(Range("A1:D1"), Target) Is Nothing) Then
If (One < Two) Then
MsgBox "The value in cell D1 cann't be greater than cell A1!", vbInformation, "Kutools for Excel"
End If
End If
ExitSub:
End Sub

Nodyn: Yn y cod uchod, A1 ac D1 yw'r ddwy gell rydych chi am gymharu â nhw.

3. Yna, arbedwch a chau ffenestr y cod, wrth nodi gwerth sy'n llai na'r gwerth yng nghell A1, bydd blwch neges yn cael ei popio i fyny fel isod y llun a ddangosir:


Erthyglau blwch negeseuon mwy cymharol:

  • Creu Blwch Negeseuon Pop Up Wrth Agor Ffeil Excel
  • Mewn achos penodol, efallai y byddwch am gael blwch negeseuon bob amser naidlen i'ch atgoffa beth sydd angen i chi ei wneud gyntaf pan fyddwch chi'n agor llyfr gwaith penodol, gall hyn eich helpu i gofio gwneud y peth pwysicaf yn eich gwaith bob dydd. Ac yn yr erthygl hon, byddaf yn siarad am sut i greu blwch negeseuon naidlen wrth agor ffeil Excel.
  • Creu Blwch Neges Ydw Nac ydw Cyn Rhedeg Macro Yn Excel
  • Yn Excel, gallwch sbarduno macro yn uniongyrchol trwy wasgu'r allwedd F5 neu glicio ar y botwm Run yn ffenestr Microsoft Visual Basic for Applications. Ond, weithiau, efallai yr hoffech chi greu blwch neges a fydd yn gofyn i'r defnyddiwr a ydyn nhw am redeg y macro. Os oes, yna parhewch i redeg y cod, os na, rhowch y gorau i redeg y cod. Yr erthygl hon, byddaf yn siarad am sut i greu blwch neges ie na cyn rhedeg macro yn Excel.
  • Creu Amserydd Blwch Negeseuon i Gau'r Auto Y Blwch Negeseuon Ar Ôl Amser Penodol
  • Gallwch ddefnyddio sgript VBA yn aml i ddatrys problemau wrth ddefnyddio llyfr gwaith Excel. A bydd blychau negeseuon yn ymddangos yn ystod y sgript. Mewn rhai achosion, hoffech i rai blychau neges penodedig gael eu cau'n awtomatig ar ôl amser penodol yn hytrach na'u cau â llaw. Yn yr erthygl hon, byddwn yn dangos dull i chi o greu amserydd blwch neges i gau'r blwch negeseuon yn awtomatig ar ôl amser penodol yn Excel.


  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau a Cadw Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi Dyblyg a Swm / Cyfartaledd... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Fformiwlâu Hoff a Mewnosod yn Gyflym, Meysydd, Siartiau a Lluniau; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Grwpio Tabl Pivot yn ôl rhif wythnos, diwrnod o'r wythnos a mwy ... Dangos Celloedd Datgloi, wedi'u Cloi yn ôl gwahanol liwiau; Amlygu Celloedd sydd â Fformiwla / Enw...
tab kte 201905
  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (3)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
GRACIAS, COMO PUEDO HACER PARA AMPLIARLO A UN RANDO MAS GRANDE ES DECIR O15:O100, N15:N100
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yn eich enghraifft VB uchod mae Blwch Neges Naid yn digwydd Os yw Cell A1 yn Llai na D1 sy'n gweithio'n dda, fodd bynnag, sut ydw i'n ei wneud hefyd yn creu neges Naid ar gyfer cell A2 yn Llai na D2, mae A3 yn Llai na D3 ac yn y blaen.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am hyn, fe weithiodd yn wych! Ond rydw i eisiau gwybod sut alla i wneud i hyn weithio os yw'r gell rydw i'n ei monitro yn dibynnu ar gell ar Daflen arall. Er enghraifft mae A1 yn Nhaflen 1 yn newid gwerthoedd os yw cell A3 yn Nhaflen 2 yn newid. Mae gen i rywbeth fel hyn ac ni ddaeth y neges naid i fyny, dim ond wrth newid yr A1 ar Daflen 1 â llaw.

Diolch!
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir