Type: Berichten; Gebruiker: Ingrid B
Ik kan niet volgen. Als je de verwijzing naar het blad er hebt uitgehaald, wat schiet er dan nog over van de formule?
Je oorspronkelijke vraag begreep ik al niet goed, maar je laatste bericht is voor mij helemaal onverstaanbaar :(
Is het zo iets dat je zoekt:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$A$2" Then
Range("D:D").Find(Target,...
Heb je eerst een naam gedefinieerd? Want dat is juist om er voor te zorgen dat je een lijst van op een ander blad kan gebruiken in Data/Validatie.
Een xls kan je niet uploaden, dus eerst zippen...
Selecteer de namen
ga naar Invoegen/Naam/Definiëren
en typ een naam in, bijv namen
selecteer nu de cel waarin de keuzelijst moet komen
ga naar Data/Valideren
Toestaan: Lijst
Bron: =namen
...
Heb je de formule exact gekopieerd naar een cel in de eerste rij? Dan staat daar eigenlijk:
=Blad1!A1
dus moet er ook een blad bestaan met de naam Blad1, anders krijg je inderdaad die foutcode.
Ik kan niet volgen. Kan je het documentje hier eens als bijlage toevoegen, dan wordt het misschien wat duidelijker.
Als je Works nog ter beschikking hebt kan je het document daarin opslaan als Excel-formaat.
Volgende formule in rij1 verwijst naar A1 op Blad1:
=INDIRECT("'Blad"&RIJ()&"'!A1")
Vervolg vraag 2: interactief ja/nee
En het antwoord op de 3e vraag begrijp ik niet.
Je zegt dat de url er rechtstreeks in staat, zonder formule, maar toch staat er een formule in ???
En je...
Als je datums zonder scheidingsteken wilt invoeren zal je de waarde door VBA moeten laten omzetten, Excel kan dat anders niet als datum herkennen.
http://www.cpearson.com/excel/DateTimeEntry.htm
Enkele vraagjes:[list=1] Met welke Excel-versie werk je
Hoe is de pagina opgeslagen (hele werkmap/blad, interactief ja/nee)
Hoe zijn de hyperlinks ingevoerd (formule, Invoegen - Hyperlink,...
AutoAanvullen werkt enkel in een aaneengesloten gebied, dus als er lege cellen in de kolom voorkomen, dan kijkt AutoAanvullen enkel tot aan die lege cel.
Je kan het document opslaan als sjabloon.
Je kan via een macro eerst de kolom kopiëren en vervolgens de gegevens vernieuwen. Je moet er dan wel op letten nooit de gegevens rechtstreeks te vernieuwen.
Sub test()
Range("C:C").Copy
...
Vervang de formules in kolom A door
=RIJ()-1
Met volgende code zou het moeten lukken (ook in Excel 97)
Private Sub CmdWeergeven_Click()
If Not (OptionButton1 Or OptionButton2 Or OptionButton3) Then
MsgBox "Geen selectie gemaakt"
...
Formule in F1:
=GROOTSTE($A$1:$A$13;RIJ())
Deze formule kan je doorvoeren tot F13
Sub test()
Dim r As Long, laatste As Long, r2 As Long
laatste = Range("B65536").End(xlUp).Row
r2 = 2
For r = 2 To laatste
If Cells(r, 2) = Cells(r - 1, 2) Or Cells(r, 2) = Cells(r + 1,...
Welk scheidingstekens is in het bestand gebruikt en welk op je pc?
Op welke manier heb je het bestand geopend?
Als het scheidingsteken in het csv-bestand gelijk is als hetgeen er op jou pc is ingesteld, dan kan je het document gewoon openen in Excel, de gegevens zullen dan automatisch in kolommen gezet...
Ik heb niet de nodige software om een rar-file te openen, dus ik ben enkel voortgegaan op je uitleg.
Staan de gegevens in kolom A? Zo niet, heb je dan de celverwijzingen in de gegevens formule...
Ik heb het op een Excel 97 uitgetest, dus volgens mij zou het zo moeten werken.
Excel 97 heeft blijkbaar problemen als er een tekstwaarde in de cel staat. Volgende macro zou wel moeten werken:
Sub weergeven()
Dim r As Long, laatste As Long
...
Plaats in een extra kolom volgende formule:
=ALS(ISGETAL(A1);A1;"")
voer de formule door tot het einde van de lijst.
Kopieer vervolgens deze kolom
ga naar Bewerken/Plakken speciaal
en...