Vraag : Na code die binnen blink 2003 maar niet 2007 uit werken

De volgende code werkt binnen uitblinkt 2003 maar 2007 niet binnen uitblinken.  Het stelt eerste VLOOKUP in werking maar overslaand de rest ........... te helpen gelieve .....

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:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
Sheets („Controle KBE“). Selecteer

Waaier („I2“). Selecteer


    x = 2
    
    Doe tot Cellen (x, 3) = ""
    
    Cellen (x, 9). Selecteer
    
    ActiveCell.FormulaR1C1 = _
        „=IF (ISNA (VLOOKUP (RC [- 6], „Kbe- Gegevens te trekken van“! C [- 8], VALSE 1,))=FALSE, "" O.K. "", "" die KBE "")“ missen
        
        Als ActiveCell.Value = „het Missen KBE“ toen
        
                ActiveCell.FormulaR1C1 = _
            „=IF (ISNA (VLOOKUP (RC [- 6], „Kbe- Gegevens te trekken van“! C [- 6], VALSE 1,))=FALSE, verwierp "" KBE "", "" Missend KBE "")“
        
                Als ActiveCell.Value = „het Missen KBE“ toen
            
                        ActiveCell.FormulaR1C1 = _
                    „=IF (ISNA (VLOOKUP (RC [- 6], „Kbe- Gegevens te trekken van“! C [- 4], VALSE 1,))=FALSE, herzien de Behoeften "" KBE "", "" Missend KBE "")“
                    
                        Als ActiveCell.Value = „het Missen KBE“ toen

                                ActiveCell.FormulaR1C1 = _
                            „=IF (ISNA (VLOOKUP (RC [- 6], „Kbe- Gegevens te trekken van“! C [- 2], VALSE 1,))=FALSE, "" in Klaar voor KBE 47 "", "" die KBE "")“ missen
                            
                                Als ActiveCell.Value = „het Missen KBE“ toen
                                
                                        ActiveCell.FormulaR1C1 = _
                                    „=IF (ISNA (VLOOKUP (RC [- 6], „Kbe- Gegevens te trekken van“! C, VALSE 1,))=FALSE, "" in Klaar voor KBE 48 "", "" die KBE "")“ missen
                                    
                                Eind als
                                
                        Eind als
                        
                Eind als
                
        Eind als
                
        
    
    x = x + 1
    
    Lijn


-Brandon

Antwoord : Na code die binnen blink 2003 maar niet 2007 uit werken

                                                      Voor om het even wie geinteresseerd in hoe ik mijn probleem oploste. Ik gebruikte javax.ws.rs.core. De annotatie van de context.

@Context
De reactie van HttpServletResponse;

Dan in mijn de dienstmethodes voegde ik dit toe:
response.addHeader („naam“, „waarde“);

Dat is het.


Andere oplossingen  
 
programming4us programming4us