• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

slash (schuine streep) alleen weer gegeven

Status
Niet open voor verdere reacties.

dirkdrent

Gebruiker
Lid geworden
3 jan 2006
Berichten
382
Ik heb in een cel de volgende formule geplaatst...

=(B2)&"/"&(C2)&"/"&(D2)&"/"&(E2)

Nu wil ik graag dat de slash (schuine streep) alleen wordt weer gegeven wanneer de cel gevuld is en niet wanneer deze leeg is want nu geeft hij de streep aan terwijl dit niet moet.

B2 / C2 / D2 / E2

Eten/Italiaans/Pasta/Vegetarisch
Eten/Italiaans/Pizza/
Eten /Hollands//

De schuine strepen zijn bij de laatste 2 dus overbodig...

Zie ook voorbeeld in de bijlage...

Wie kan mij helpen?Bekijk bijlage helpmij schuine streep probleem.xls
 
Laatst bewerkt door een moderator:
@dirkdrent

code kopiëren en plakken in F2 en doortrekken naar beneden . succes...

Code:
=ALS(ISTEKST(C3);B3&"/";B3)&ALS(ISTEKST(D3);C3&"/";C3)&ALS(ISTEKST(E3);D3&"/";D3)&(E3)
 
Ik heb de formule aangepast na de cel F2 want hij stond ingesteld op cel F3...

In ieder geval heel erg bedankt voor deze oplossing kan ik weer verder :)
 
Of een macrootje.
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
 Application.EnableEvents = False
  Dim cl, i As Integer, j As Integer
    Range("F2:F" & Cells(Rows.Count, 6).End(xlUp).Row).ClearContents
     For i = 2 To Cells(Rows.Count, 2).End(xlUp).Row
      For j = 2 To 5
       For Each cl In Cells(i, j)
         If cl > 0 Then
           If Cells(i, 6) = "" Then
          Cells(i, 6) = cl
         Else
        Cells(i, 6) = Cells(i, 6) & "/" & cl
      End If
     End If
    Next cl
   Next j
  Next i
 Application.EnableEvents = True
End Sub
 
@dirkdrent
Verzoek om een fatsoenlijke topictitel te verzinnen, hele formules is topictitels is hier niet gewenst. Titel is aangepast.
 
Als er steeds in een cel slechts één woord staat, is deze formule óók mogelijk...
Code:
[English]	=SUBSTITUTE(TRIM(B2&" "&C2&" "&D2&" "&E2);" ";"/")

[Dutch] 	=SUBSTITUEREN(SPATIES.WISSEN(B2&" "&C2&" "&D2&" "&E2);" ";"/")

Groet, Leo
 
Drie dezelfde bijlages teruggebracht tot één.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan