terima kasih master Nang Agus....script dari anda berhasil sesuai dengan
kebutuhan....
Pada Jumat, 7 Agustus 2015 9:09, "Nang Agus [email protected]
[belajar-excel]" <[email protected]> menulis:
Dear LT Dmp
Pakai macro ya....
Option Explicit
Sub pecah()
Dim i As Integer
Dim nom As Integer
Dim kar As Variant
Dim wis As Variant
Dim has As Variant
kar = Range("C20").Value
For i = 1 To Int(Len(kar) / 85) + 1
wis = Left(kar, 86)
If Right(wis, 1) = " " Then
has = Left(wis, 85)
Else
If Len(wis) < 86 Then
nom = Len(wis)
Else
nom = InStrRev(wis, " ", -1)
End If
has = Mid(wis, 1, nom)
End If
Range("M" & 30 + i) = has
kar = Mid(kar, Len(has) + 1)
Next i
End Sub
sebenarnya macro tersebut dapat disederhanakan, silahkan diubah sesuai
kebutuhan.
Salam
Nang Agus
2015-08-06 12:23 GMT+07:00 It Dpm [email protected] [belajar-excel]
<[email protected]>:
Dear Master Excelsekalian,
Mohonbantuan para master sekalian, bagaimanacaranya split (memecah) text
yang panjang menjadi beberapa cell tanpaada kata yang terpenggal seperti contoh
terlampir...
terima kasih sebelumnya
#yiv6093177136 #yiv6093177136 -- #yiv6093177136ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv6093177136
#yiv6093177136ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv6093177136
#yiv6093177136ygrp-mkp #yiv6093177136hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv6093177136 #yiv6093177136ygrp-mkp #yiv6093177136ads
{margin-bottom:10px;}#yiv6093177136 #yiv6093177136ygrp-mkp .yiv6093177136ad
{padding:0 0;}#yiv6093177136 #yiv6093177136ygrp-mkp .yiv6093177136ad p
{margin:0;}#yiv6093177136 #yiv6093177136ygrp-mkp .yiv6093177136ad a
{color:#0000ff;text-decoration:none;}#yiv6093177136 #yiv6093177136ygrp-sponsor
#yiv6093177136ygrp-lc {font-family:Arial;}#yiv6093177136
#yiv6093177136ygrp-sponsor #yiv6093177136ygrp-lc #yiv6093177136hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv6093177136
#yiv6093177136ygrp-sponsor #yiv6093177136ygrp-lc .yiv6093177136ad
{margin-bottom:10px;padding:0 0;}#yiv6093177136 #yiv6093177136actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv6093177136
#yiv6093177136activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv6093177136
#yiv6093177136activity span {font-weight:700;}#yiv6093177136
#yiv6093177136activity span:first-child
{text-transform:uppercase;}#yiv6093177136 #yiv6093177136activity span a
{color:#5085b6;text-decoration:none;}#yiv6093177136 #yiv6093177136activity span
span {color:#ff7900;}#yiv6093177136 #yiv6093177136activity span
.yiv6093177136underline {text-decoration:underline;}#yiv6093177136
.yiv6093177136attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv6093177136 .yiv6093177136attach div a
{text-decoration:none;}#yiv6093177136 .yiv6093177136attach img
{border:none;padding-right:5px;}#yiv6093177136 .yiv6093177136attach label
{display:block;margin-bottom:5px;}#yiv6093177136 .yiv6093177136attach label a
{text-decoration:none;}#yiv6093177136 blockquote {margin:0 0 0
4px;}#yiv6093177136 .yiv6093177136bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv6093177136
.yiv6093177136bold a {text-decoration:none;}#yiv6093177136 dd.yiv6093177136last
p a {font-family:Verdana;font-weight:700;}#yiv6093177136 dd.yiv6093177136last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv6093177136
dd.yiv6093177136last p span.yiv6093177136yshortcuts
{margin-right:0;}#yiv6093177136 div.yiv6093177136attach-table div div a
{text-decoration:none;}#yiv6093177136 div.yiv6093177136attach-table
{width:400px;}#yiv6093177136 div.yiv6093177136file-title a, #yiv6093177136
div.yiv6093177136file-title a:active, #yiv6093177136
div.yiv6093177136file-title a:hover, #yiv6093177136 div.yiv6093177136file-title
a:visited {text-decoration:none;}#yiv6093177136 div.yiv6093177136photo-title a,
#yiv6093177136 div.yiv6093177136photo-title a:active, #yiv6093177136
div.yiv6093177136photo-title a:hover, #yiv6093177136
div.yiv6093177136photo-title a:visited {text-decoration:none;}#yiv6093177136
div#yiv6093177136ygrp-mlmsg #yiv6093177136ygrp-msg p a
span.yiv6093177136yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv6093177136
.yiv6093177136green {color:#628c2a;}#yiv6093177136 .yiv6093177136MsoNormal
{margin:0 0 0 0;}#yiv6093177136 o {font-size:0;}#yiv6093177136
#yiv6093177136photos div {float:left;width:72px;}#yiv6093177136
#yiv6093177136photos div div {border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}#yiv6093177136
#yiv6093177136photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv6093177136
#yiv6093177136reco-category {font-size:77%;}#yiv6093177136
#yiv6093177136reco-desc {font-size:77%;}#yiv6093177136 .yiv6093177136replbq
{margin:4px;}#yiv6093177136 #yiv6093177136ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv6093177136 #yiv6093177136ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv6093177136
#yiv6093177136ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv6093177136
#yiv6093177136ygrp-mlmsg select, #yiv6093177136 input, #yiv6093177136 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv6093177136
#yiv6093177136ygrp-mlmsg pre, #yiv6093177136 code {font:115%
monospace;}#yiv6093177136 #yiv6093177136ygrp-mlmsg *
{line-height:1.22em;}#yiv6093177136 #yiv6093177136ygrp-mlmsg #yiv6093177136logo
{padding-bottom:10px;}#yiv6093177136 #yiv6093177136ygrp-msg p a
{font-family:Verdana;}#yiv6093177136 #yiv6093177136ygrp-msg
p#yiv6093177136attach-count span {color:#1E66AE;font-weight:700;}#yiv6093177136
#yiv6093177136ygrp-reco #yiv6093177136reco-head
{color:#ff7900;font-weight:700;}#yiv6093177136 #yiv6093177136ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv6093177136 #yiv6093177136ygrp-sponsor
#yiv6093177136ov li a {font-size:130%;text-decoration:none;}#yiv6093177136
#yiv6093177136ygrp-sponsor #yiv6093177136ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv6093177136
#yiv6093177136ygrp-sponsor #yiv6093177136ov ul {margin:0;padding:0 0 0
8px;}#yiv6093177136 #yiv6093177136ygrp-text
{font-family:Georgia;}#yiv6093177136 #yiv6093177136ygrp-text p {margin:0 0 1em
0;}#yiv6093177136 #yiv6093177136ygrp-text tt {font-size:120%;}#yiv6093177136
#yiv6093177136ygrp-vital ul li:last-child {border-right:none
!important;}#yiv6093177136
