Fråga : Felmeddelandet som baseras på godkännande, härskar - VB-händelseförlagehanteraren

Hälsningar som bygger på ett föregående svar med denna, ifrågasätter.  Jag har fäst en spara för reference.

I har uppsättningen ett popup datagodkännande som varnar användare som de skapar en conflct med miles som redan annars tilldelas till någon.  Ska detta är ett territoriumspårningräkneark, och ska händ, så att är varför I-förmiddagen som varnar användarena och inte stoppar dem. förmiddagen för

I långt söker efter a för att befolka det popup med, specificerar av konflikten?  Ha det popup att berätta användaren som något som är liknande till ”milen, spänner dig skrev in konflikter med mig det existerande territoriet på I-35, till exempel.  Om detta är vad du ämnar göra, behaga justerar mig territoriet på I-35 därmed "

Thanks till Harfang, och deras arbete på detta föregående, de berättade mig ”mig förmiddagen jag inte vet ganska sure som alla den bäst metoden som finner ror den överlappning i VB, så jag skulle föreslår att du frågar ett nytt släkt ifrågasätter (using anslå anknyta i denna ifrågasätter). Kriterierna som ska användas, är: väg för

= R och BegMile < E och EndMile > B

R: strömrads Road
E: strömraden avslutar Mile
B: strömradens förtrolighet för

My för Mile för början " med VBA överträffar in limitieds till makro som jag har kopierat av rengöringsduken…, Jag har aldrig skriftliga en idéer för myself.

Any, om denna kan göras?

Thank dig! " för

filename” för class= för >

 (20 KB)” javascript för href= " för <-/span>
" l class= >
example
class= " tom " ><-/div>Territory-test.xls (20 KB)” javascript för href= " för <-/span>
example file
<-/div>
" " för >
<-/div> Related lösningar för class= ": " title= " för Determinen för class= ", om validerade data har redan varit used

Svar : Felmeddelandet som baseras på godkännande, härskar - VB-händelseförlagehanteraren

Ledsna Savants, jag var en slarvig littlem, är här en reviderad version. 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:

Offentliga underCheckRoad (iRow som heltal)
    Dunkel lLastRow som Long
    
    LastRow& = celler (Rows.Count, 3). Avsluta (xlUp). Ro
    sRoad = celler (iRow, 2). Värdera
    Start = celler (iRow, 3). Värdera
    Fullföljande = celler (iRow, 4). Värdera
    bWarning = falskt
    
    För iX = 2 till LastRow
        Om iRow <> iX därefter
            Om celler (iX, 2). Värdera = sRoad därefter
                Om celler (iX, 3). Värdera >=start och celler (iX, 3). Värdera <>= start och celler (iX, 4). Värdera  <>
Andra lösningar  
 
programming4us programming4us