Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Excel Spalte teilen (nach max. Länge und Wörtern)

Frage Microsoft Microsoft Office

Mitglied: kattnerzone

kattnerzone (Level 1) - Jetzt verbinden

09.10.2009 um 13:12 Uhr, 12649 Aufrufe, 3 Kommentare

Guten Tag, ich habe folgendes Problem:

In dem Feld A1 steht z.B.: Zylinderschraube DIN912 M5x25 A2

Das Feld darf jetzt aber nur noch 20 Zeichen beinhalten, alles was darüber hinaus geht, soll in das Feld B1 kopiert werden.
Habe dafür auch schon die Funktion "TEIL" gefunden, bloß leider schneidet die Funktion das Feld nach genau 20 Zeichen ab.

Leider passt das dann sehr häufig nicht mehr mit den Wörtern im Feld zusammen.

Bei dem Beispiel würde dann z.B. im Feld A1 "Zylinderschraube DIN" stehen und der Rest im anderen Feld. Das macht natürlich nicht ganz so viel Sinn.

Excel müsste dann z.B. im Feld A1 nur Zylinderschraube stehen lassen und den Rest in das nächste Feld kopieren.

Es würde aber leider auch nicht ausreichen, wenn nach dem ersten Wort abgeschnitten wird, weil evtl. die ersten 3 Wörter bloß 14 Zeichen lang sind und auch zusammen gehören z.B. Handrad Typ 50 (Feld A1) und dann Linksgewinde (Feld B1). Deshalb funktioniert auch die Funktion Text in Spalten nicht.

Hat evtl. jemand eine Lösung für mein Problem, denn es wäre echt mühselig, wenn man nachher durch alle Zeilen gehen muss und die Werte anpassen.

Gruß
Kattnerzone
Mitglied: godlie
09.10.2009 um 13:24 Uhr
Hallo,

ich fasse mal zusammen du brauchst eine Funktion die dir nach 20 Zeichen etwas trennt,
wobei aber die Sinnhaftigkeit erhalten bleibt?

Dann hab ich die Lösung für dich:
Besorg dir nen Praktikant!

Alternativ würde ich über ein Macro schaun wo das erste Leerzeichen ist und dort trennen.
wenns über 20 Zeichen ist, tja....
Bitte warten ..
Mitglied: nube-li
09.10.2009 um 13:35 Uhr
Es gibt da eine Funktion "links". schau dir die mal genauer an.
Die schneidet ab, jedoch verschiebt sie den Rest nicht in b1 oder sonst wohin.. für des brauchst ne andere Lösung
Bitte warten ..
Mitglied: SamTrex
10.10.2009 um 01:17 Uhr
Guten Morgen Kattnerzone,

also, du könntest mit folgendem kleinen Macro eine Trennung bewerkstelligen:

01.
Sub test() 
02.
    Dim a As String                         'Variable deklarieren / Zellenwert als String! 
03.
    a = Range("a1").Value                   'Wert aus Zelle in Variable "a" einlesen 
04.
    If Len(a) > 20 Then                     'Prüfen ob String länger wie 20 Zeichen 
05.
        Range("A1").Value = Mid(a, 1, 20)   'Inhalt von "a" bis Zeichen 20 in Zelle A1 schreiben 
06.
        Range("B1").Value = Mid(a, 21)      'Inhalt von "a" ab Zeichen 21 in Zelle B1 schreiben 
07.
    End If 
08.
    a = Nothing                             'Variable zerstören 
09.
End Sub
Du könntest jetzt natürlich auch die IF Abfrage gegen eine SELECT CASE Abfrage tauschen und noch mehr Bedingungen setzten.
Allerdings kann das Macro nie wissen wo du deinen String am liebsten trennen möchtest ....

Gruß Sam
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
JavaScript
gelöst Max. Länge einer Variable (Javascript)?? (4)

Frage von internet2107 zum Thema JavaScript ...

Microsoft Office
gelöst Verschieben von Zellinformation in andere Spalte (per VBA) excel 2010 (5)

Frage von thomas1972 zum Thema Microsoft Office ...

VB for Applications
gelöst Excel VBA .csv Import in Tabelle x, ab Spalte y

Frage von drimrim zum Thema VB for Applications ...

Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (33)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (21)

Frage von DavidGl zum Thema LAN, WAN, Wireless ...

Viren und Trojaner
Aufgepasst: Neue Ransomware Goldeneye verbreitet sich rasant (20)

Link von Penny.Cilin zum Thema Viren und Trojaner ...