Handig stukjequote:Op maandag 15 december 2008 21:21 schreef DaFan het volgende:
Np. Ik vergeet trouwens ook altijd Ctrl-Shift-Enter te doen
Als je trouwens nog wat achtergrond wil qua array-formules:
http://www.mrexcel.com/tip011.shtml
Kan je mooie dingen mee doen hoor
Interessant!quote:Op maandag 15 december 2008 21:21 schreef DaFan het volgende:
Np. Ik vergeet trouwens ook altijd Ctrl-Shift-Enter te doen
Als je trouwens nog wat achtergrond wil qua array-formules:
http://www.mrexcel.com/tip011.shtml
Kan je mooie dingen mee doen hoor
1 |
1 2 3 4 5 | Shapes("Pic1").Delete End Sub |
Met als resultaat:quote:If Verzekering.Value = True Then
ActiveDocument.bookmarks("Verzekering").Range.InsertAfter Chr(13) & "Klant behoort het voertuig deugdelijk (All-Risk) te verzekeren en een kopie polis ter inzage aan te bieden."
End If
Nu moet als resultaat het volgende naar voren komen:quote:Klant behoort het voertuig deugdelijk (All-Risk) te verzekeren en een kopie polis ter inzage aan te bieden.
De regel moet dus worden opgeknipt en worden voorzien van bold. Maar met welke code zorg ik ervoor dat alleen deugdelijk en kopie vet worden weergegeven?quote:Klant behoort het voertuig deugdelijk (All-Risk) te verzekeren en een kopie polis ter inzage aan te bieden.
nee, dan moet ik alles een voor een kopieren en het zijn zo'n 30.000 gegevens. als ik op het + druk herhaalt hij alleen de reeds gekopieerde waarden.quote:
Alle cellen kopiëren en dan kiezen voor "(rechtermuisknop) plakken speciaal" en dan formules?quote:Op vrijdag 19 december 2008 23:13 schreef Fortitudo het volgende:
[..]
nee, dan moet ik alles een voor een kopieren en het zijn zo'n 30.000 gegevens. als ik op het + druk herhaalt hij alleen de reeds gekopieerde waarden.
nee ook al geprobeerd dan kopieert hij alleen bijv: =AVERAGE(B4:B135). het tabblad staat echter niet in de formule.quote:Op vrijdag 19 december 2008 23:19 schreef qu63 het volgende:
[..]
Alle cellen kopiëren en dan kiezen voor "(rechtermuisknop) plakken speciaal" en dan formules?
Dat zul je met een macro moeten oplossen. Door middel van een formule gaat dat (volgens mij) niet werken.quote:Op maandag 22 december 2008 15:23 schreef SimonVennekens het volgende:
[Excel 2007 - Nederlands]
Is het mogelijk om door middel van een formule cellen te verbergen/te laten zien?
Ik wil dus dat als uit de formule blijkt dat er het antwoord 0 is dat dan de hele rij verborgen wordt...
Volgens mij gaat dit niet lukken. Immers, je vermeld een formule in een cel die je kunt overschrijven waarmee de formule niet meer actief is.quote:Op maandag 22 december 2008 16:50 schreef Wouser het volgende:
Ik zit met het volgende probleem. Ik heb twee cellen A1 en A2. A1 heeft de waarde 5 en A2 heeft de waarde 2.
A1 = 5
A2 = 2
Wanneer ik nu de waarde van A1 verander in bijvoorbeeld 2. Dan veranderd de waarde van A2 in 4 (A1*A2 = 2*2 = 4)
A1 = 2
A2 = 4
Wanneer ik nu de waarde van A2 verander in bijvoorbeeld 3. Dan veranderd de waarde van A1 in 6 (A1*A2 = 2*3 = 6)
Nu kan ik dit probleem wel oplossen in visual basic. Maar ik wou graag weten of dit ook mogelijk is m.b.v. excel functies? En wanneer het mogelijk is misschien een paar tips in de goeie richting.
Ja dan zou het wel kunnen maar jammer. Dacht zelf ook niet dat het kon. Maja maakt niet uit moet me collega het maar met VB doenquote:Op maandag 22 december 2008 18:10 schreef ManAtWork het volgende:
[..]
Volgens mij gaat dit niet lukken. Immers, je vermeld een formule in een cel die je kunt overschrijven waarmee de formule niet meer actief is.
Je zou het door middel van een hulpcel kunnen oplossen. Maar dat had je waarschijnlijk zelf ook al bedacht.
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 | Public infinity As Boolean Public address As String Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Dim oSheet As Worksheet Dim iTemp As Integer Set oSheet = Sh address = Target.address If infinity = False Then infinity = True If address = "$A$1" Then oSheet.Range("$A$2").Value = oSheet.Range("$A$1").Value * oSheet.Range("$A$2").Value ElseIf address = "$A$2" Then oSheet.Range("$A$1").Value = oSheet.Range("$A$1").Value * oSheet.Range("$A$2").Value End If End If End Sub Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) infinity = False End Sub |
quote:Op woensdag 24 december 2008 00:19 schreef Wouser het volgende:
Ik snap er geen hol van wat je bedoeltmaarrr je wilt van iedere factuur een eigen (geautomatiseerde) nieuwe werkblad laten creëren? Uiteraard moeten meerdere facturen die van 1 klant zijn op hetzelfde blad...? Zo ja dan zou ik hier niet al te moeilijk doen maar gewoon een VB code voor maken. Kun je er ook nog een mooi formpje bij maken etc...
Ps weet niet of je weet maar je facturen zijn wel te breed voor een A4...? Iig bij mij is ie te breed.
En dit is btw wel om te huilenwerkblad 2 F32...
=(F31*1.19)-F31
oh en waarom mogen we eurotool niet bekijken
Forum Opties | |
---|---|
Forumhop: | |
Hop naar: |