Ürün kodu oluşturma

[kadir_s]

Merhaba,

ürün kodu oluşturmak istiyorum. bir örnekle açıklamaya çalışayım


Ör:

a1 - DENEME TEKSTİL b1 - "tarih" c1- ""saat" d1- DEN1312071110

a1 hücresinin ilk üç harfi + b1 o an ki tarih (13.12.07) + c1 o an ki saat 11:10

sırasıyla a1 i doldurduktan sonra ardından b1 c1 otomatik zaten ve d1 hücresine geldiğimde bahsettiğim sistemde ürün kodunu nasıl elde edebilirim? Burada kodun ben d1 e tıkladığım her seferinde değişmemesi gerekiyor. Kafamdaki buydu ama farklı yöntemlerle bunu yapma şansımız varsa yardımlarınızı almak isterim?

Teşekkürler, iyi çalışmalar

 

[Necdet]

Merhaba, fikir vermek babından,

A sütununa yazdığınız değerin ilk 3 karakterini alır, tarih ve saat ile birleştirerek B sütununa yazar.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Son
If Intersect(Target, [A:A]) Is Nothing Then Exit Sub
If Target <> "" Then
[INDENT]Target.Offset(, 1) = Left(Target, 3) & " " & Format(Date, "dd.mm.yy") & " " & Format(Now, "hh:mm")
[/INDENT]End If
Son:
End Sub

 

[baydeniro]

Hocam merhaba. D1 hücresine şu formülü yapıştır :

=LEFT(A1;3)&DAY(B1)&MONTH(B1)&RIGHT(YEAR(B1);2)&HOUR(C1)&MINUTE(C1)


HO UR ayrı gibi duruyor. Formülü kopyaladıktan sonra boşluğu almak lazım.

 

[kadir_s]

Serdar Bey ve Necdet Bey ikinize de yardımlarınız için teşekkürler. Necdet Bey'in uygulaması hazırladığım şablon için daha kullanışlı geldi.

İyi çalışmalar

 

[baydeniro]

Sorununuzun çözüldüğüne sevindim. Sağlıcakla kalın.