ادغام دو سل با CommandButton

[jeddi]

و اساتيد محترم
من مي خوام دو سل يكي مبلغ ودر ديگري متن يا علامت خاص مثلا * با CommandButton باهم ادغام بشه نمي دونم چه كار كنم داخل محيط اكسل با CONCATENATE ميشه ولي در محيط vb نمي تونم . لطفا راهنمايي كنيد متشكرات خيلي فراوان

[milad.moafi]

RE: ادغام دو سل با CommandButton

از worksheetfunction استفاده کن
مثال:
()worksheetfunction.RandBetween

[jeddi]

RE: ادغام دو سل با CommandButton

سلام دوست عزيز
ببخشيد نتونستم از اون استفاده كنم
اين و مي خوام درست بشه
Private Sub CommandButton8_Click()
Dim c As Range
For Each c In Range("b6:b20")
If c = "" Then
c =RandBetween(c.Offset(0, 1);"*")
End If
Next
End Sub

[امين اسماعيلي]

RE: ادغام دو سل با CommandButton


با درود به دوست عزیز
فایل زیر رو دانلود کن فکر کنم کمکتون کنه امیدوارم.

http://uplod.ir/idl8r5mr6uhn/Join_2_column.xlsm.htm



با تشکر از استاد خوبم استاد امد شمس العلما
در پناه خداوندگارایران زمین باشید و پیروز

[milad.moafi]

RE: ادغام دو سل با CommandButton

مشکل اینجاست که هر جا می خوای از توایع خود اکسل استفاده کنی دوباره باید worksheetfunction رو فراخونی کنی.