نقل فولدر إلى فولدر آخر بتحقق شرط معين

[محمد يوسف]

السلام عليكم ورحمة الله وبركاته 

أحبتي في الله، أريد نقل فولدر تلقائي إذا تحقق الشرط المطلوب في  c5

وباقي  الشرح في الملف المرفق

مجلد جديد ‫‬.rarFetching info...

[محمد يوسف]

السلام عليكم ورحمة الله وبركاتة

 

هل من الممكن  نقل فولدر كامل- الي  فولدر الخالص اذا تحقق الشرط المطلوب في عمود c5  مجلد جديد ‫‬.rar

تم تعديل ديسمبر 22, 2018 بواسطه محمد يوسف

[محمد يوسف]

هل ممكن ان يتم نقل فولدر الي فولدر اذا تحقق شرط في عمود c5 

ارجو من اساتذة وخبراء هذا المنتدي الجميل  الرد -  مثال  مجلد جديد ‫‬.rar

[بن علية حاجي]

للرفع...

 

[أحمد يوسف]

يمكنك استخدام هذا الكود

Sub sbCopyingAFile()

'Declare Variables
Dim FSO
Dim sFile As String
Dim sSFolder As String
Dim sDFolder As String

'This is Your File Name which you want to Copy
sFile = "Sample.xls"

'Change to match the source folder path
sSFolder = "C:\Temp\"

'Change to match the destination folder path
sDFolder = "D:\Job\"

'Create Object
Set FSO = CreateObject("Scripting.FileSystemObject")

'Checking If File Is Located in the Source Folder
If Not FSO.FileExists(sSFolder & sFile) Then
    MsgBox "Specified File Not Found", vbInformation, "Not Found"
    
'Copying If the Same File is Not Located in the Destination Folder
ElseIf Not FSO.FileExists(sDFolder & sFile) Then
    FSO.CopyFile (sSFolder & sFile), sDFolder, True
    MsgBox "Specified File Copied Successfully", vbInformation, "Done!"
Else
    MsgBox "Specified File Already Exists In The Destination Folder", vbExclamation, "File Already Exists"
End If

End Sub

 

[محمد يوسف]

استاذ أحمد يوسف اشكرك  بارك الله فيك  علي الرد ولكن ليس هذا المطلوب 

المطلوب   انا عندي عدد عملاء كبير   وكل العملاء مديونين وكل عميل في ملف منفصل اريد عندما يتم  سداد عميل يتم نقل الفولدر والملف الخاص به الي فولدر الخالص تلقائي

باقي شرح  مجمع الفواتير.rarFetching info...

استاذ أحمد يوسف اشكرك  بارك الله فيك  علي الرد ولكن ليس هذا المطلوب 

المطلوب   انا عندي عدد عملاء كبير   وكل العملاء مديونين وكل عميل في ملف منفصل اريد عندما يتم  سداد عميل يتم نقل الفولدر والملف الخاص به الي فولدر الخالص تلقائي

باقي شرح  مجمع الفواتير.rarFetching info...

استاذ بن علية حاجي اشكرك  وبارك الله فيك  علي الاهتمام بالموضوع   

المطلوب   انا عندي عدد عملاء كبير   وكل العملاء مديونين وكل عميل في ملف منفصل اريد عندما يتم  سداد عميل يتم نقل الفولدر والملف الخاص به الي فولدر الخالص تلقائي

باقي شرح  مجمع الفواتير.rarFetching info...

[محمد يوسف]

السلام عليكم ورحمة الله وبركاتة 

اريد المساعدة

وده الشرح بطريقة واضحه جدا   مجمع الفواتير.rar

 

[محمد يوسف]

اريد المساعدة من اساتذة وخبراء هذا المنتدي الجميل

وده الشرح بطريقة واضحه جدا   مجمع الفواتير.rar

 

[محمد يوسف]

 

للرفع...

تم تعديل يناير 1, 2019 بواسطه محمد يوسف

[محمد يوسف]

اشكر جميع  خبراء واساتذة هذا المنتدى ...... علي  عدم الاهتمام  بطلبي  ... وادعوا  الله ان يذيدهم علماً

[أحمد يوسف]

أخى الكريم محمد انا قمت بعمل كود لك ولكنه لم يعجبه

هذا اقصى ما لدى عموما بارك الله فيك

[محمد يوسف]

اخي  أحمد يوسف  اشكرك وبارك الله فيك 

الكود ليس بعاجبني ولكن الكود لم  يقوم بنقل الفولدر تلقائي الي فولدر الخالص

لو تكرمت حضرتك  ممكن  تيطبق الكود علي الملف 

 

جزاك الله كل خير