visual basic אין עקסעל
די אחראים: זייער נייגעריג,אחראי,thefact
- למעלה משבעים
- שר עשרת אלפים
- תגובות: 12438
- זיך איינגעשריבן אום: זונטאג מארטש 02, 2008 10:17 pm
- לאקאציע: ערגעץ פארבלאנדזשעט אויף די גראדע וואסערן
איך ווייס נישט צו דאס וועט דיר העלפן היות די קומסט נישט אריין אזוי קלאר, אבער איך האב א פייל וואס ברענגט דיר אריין די ליסט פון פייל'ס וואס ליגט אין א פאלדער, און ריקט עס צו וועלכע פאלדער די הייסט אים.
דהיינו די דארפסט אריין לייגן אין סעל C7 די פאלדער לאקעישן, לדוגמא C:\Users\User\Documents
און פארגעס נישט אנצושטעלן אין סעל C8 צו די ווילסט ער זאל דיר ארויסגעבן די סוב-פאלדער'ס (ביי דיפאלט האב איך עס געלייגט אויף FALSE)
דערנאך לייג אריין אין סעל E11 די לאקעישן ווי די ווילסט ער זאל עס ריקן לדוגמא C:\Users\User\Desktop\בילדער
מאך זיכער אז די אלע דריי זאכן זענען אריין געלייגט, דערנאך דריק קודם ליסט פייל'ס, קוק דורך צו די ווילסט טאקע אלעס ריקן אויב נישט מעק אים אויס, און פארגעס נישט צו זיכער מאכן אז עס בלייבט נישט קיין ליידיגע סעל'ס, דערנאך דריק מאוו פייל'ס, קוק איבער אין קאלום F די נאוט צו ער האט טאקע אלעס געריקט אדער געהאט פראבלעמען.
דא האסטו די פייל.
דהיינו די דארפסט אריין לייגן אין סעל C7 די פאלדער לאקעישן, לדוגמא C:\Users\User\Documents
און פארגעס נישט אנצושטעלן אין סעל C8 צו די ווילסט ער זאל דיר ארויסגעבן די סוב-פאלדער'ס (ביי דיפאלט האב איך עס געלייגט אויף FALSE)
דערנאך לייג אריין אין סעל E11 די לאקעישן ווי די ווילסט ער זאל עס ריקן לדוגמא C:\Users\User\Desktop\בילדער
מאך זיכער אז די אלע דריי זאכן זענען אריין געלייגט, דערנאך דריק קודם ליסט פייל'ס, קוק דורך צו די ווילסט טאקע אלעס ריקן אויב נישט מעק אים אויס, און פארגעס נישט צו זיכער מאכן אז עס בלייבט נישט קיין ליידיגע סעל'ס, דערנאך דריק מאוו פייל'ס, קוק איבער אין קאלום F די נאוט צו ער האט טאקע אלעס געריקט אדער געהאט פראבלעמען.
דא האסטו די פייל.
- אטעטשמענטס
-
- move-files-in-a-folder.xls
- (2.34 MiB) געווארן דאונלאודעד 297 מאל
קען איינער ציווייזן ווי אזוי צו שרייבן די פארמולע אין VBA?
דערווייל האביך פרובירט דאס, אבער ס'ארבעט נישט.
קאוד: וועל אויס אלע
=SUMPRODUCT((A2:A500<>"")/COUNTIF(A2:A500,A2:A500&""))
דערווייל האביך פרובירט דאס, אבער ס'ארבעט נישט.
קאוד: וועל אויס אלע
[SumProduct((Sheet1.Range("A2:A500") & "<>""") / wsf.CountIf(Sheet1.Range("A2:A500", Sheet1.Range("A2:A500") & """")))]
אדער
wsf.SumProduct((Sheet1.Range("A2:A500") & "<>""") / wsf.CountIf(Sheet1.Range("A2:A500", Sheet1.Range("A2:A500") & """")))
Prime Free Trial
As an Amazon Associate I earn from qualifying purchases
As an Amazon Associate I earn from qualifying purchases
- למעלה משבעים
- שר עשרת אלפים
- תגובות: 12438
- זיך איינגעשריבן אום: זונטאג מארטש 02, 2008 10:17 pm
- לאקאציע: ערגעץ פארבלאנדזשעט אויף די גראדע וואסערן
לכאורה דארף דאס צו ארבעטן.
קאוד: וועל אויס אלע
Sub openfile()
Set alte = CreateObject("word.Application")
alte.documents.Open "C:\" 'YOUR FILE PATH AND NAME HERE
alte.Visible = True
End Sub
- עין טובה
- שר ארבעת האלפים
- תגובות: 4062
- זיך איינגעשריבן אום: דאנערשטאג נאוועמבער 27, 2014 9:46 pm
- לאקאציע: 127.0.0.1
דא האסטו, לויט ווי איך פארשטיי.
צו עפענען א פראגראם, ווי למשל ווארד, נוץ דעיס.
קאוד: וועל אויס אלע
sub openprogram()
Dim asd as object
Set asd = createobject ("wscript.shell")
asd.exec "c/.........."
End sub
צו עפענען א פראגראם, ווי למשל ווארד, נוץ דעיס.
קאוד: וועל אויס אלע
sub openprogram()
Dim asd as object
Set asd = createobject ("wscript.shell")
asd.run "winword.exe"
End sub
...
-
- שר העשר
- תגובות: 49
- זיך איינגעשריבן אום: זונטאג יולי 10, 2016 9:40 pm
רעקארדן א נייע רעקארד אין די ערשטע ליידיגע צעל
א גוטן,
איך בין היבש ניי אין VBA, איך וואלט געקענט נוצן אביסל הילף אין שרייבן א מאקרא.
מיין ציהל: צו שרייבן א מאקרא וואס רעקאדירט די איצטיגע צייט אין א סעל.
איך נוץ דערפאר די now פונקציע, און עס ארבעט.
אבער דא עקא, איך קען נישט אויסגעפונען וואס איז די וועג צו סעלעקטן די ערשטע ליידיגע צעל אין א געוויסע קאלום.
דהיינו, איך וויל אז ווען איך מאך אויף די פייל, און איך לאז לויפן די מאקרא, זאל זיך רעקארדן די יעצטיגע מינוט אין א סעל אין די קאלום A, אונטער די לעצטע פולע סעל פון אט די קאלום.
קען מיר איינער העלפן דערמיט?
(עס דארף לכאורה זיין פשוט פאר עקסעל קענער).
איך בין היבש ניי אין VBA, איך וואלט געקענט נוצן אביסל הילף אין שרייבן א מאקרא.
מיין ציהל: צו שרייבן א מאקרא וואס רעקאדירט די איצטיגע צייט אין א סעל.
איך נוץ דערפאר די now פונקציע, און עס ארבעט.
אבער דא עקא, איך קען נישט אויסגעפונען וואס איז די וועג צו סעלעקטן די ערשטע ליידיגע צעל אין א געוויסע קאלום.
דהיינו, איך וויל אז ווען איך מאך אויף די פייל, און איך לאז לויפן די מאקרא, זאל זיך רעקארדן די יעצטיגע מינוט אין א סעל אין די קאלום A, אונטער די לעצטע פולע סעל פון אט די קאלום.
קען מיר איינער העלפן דערמיט?
(עס דארף לכאורה זיין פשוט פאר עקסעל קענער).
- פאטאקי08
- שר עשרת אלפים
- תגובות: 13895
- זיך איינגעשריבן אום: דאנערשטאג אוגוסט 09, 2007 1:30 pm
- פארבינד זיך:
קאוד: וועל אויס אלע
Range("E" & Cells.Rows.Count).End(xlUp).Select
will select the last non-empty cell in Col E
VBA EXCEL / ACCESS
ווייסט איינער א גיטע קורס אדער אנדערע מאטריאל זיך אויסלערנע
?VBA for excel
or Access?
?VBA for excel
or Access?
- אומאפיציעל
- שר חמש מאות
- תגובות: 546
- זיך איינגעשריבן אום: דאנערשטאג פעברואר 16, 2012 4:24 pm
למעלה משבעים האט געשריבן:איך ווייס נישט צו דאס וועט דיר העלפן היות די קומסט נישט אריין אזוי קלאר, אבער איך האב א פייל וואס ברענגט דיר אריין די ליסט פון פייל'ס וואס ליגט אין א פאלדער, און ריקט עס צו וועלכע פאלדער די הייסט אים.
דהיינו די דארפסט אריין לייגן אין סעל C7 די פאלדער לאקעישן, לדוגמא C:\Users\User\Documents
און פארגעס נישט אנצושטעלן אין סעל C8 צו די ווילסט ער זאל דיר ארויסגעבן די סוב-פאלדער'ס (ביי דיפאלט האב איך עס געלייגט אויף FALSE)
דערנאך לייג אריין אין סעל E11 די לאקעישן ווי די ווילסט ער זאל עס ריקן לדוגמא C:\Users\User\Desktop\בילדער
מאך זיכער אז די אלע דריי זאכן זענען אריין געלייגט, דערנאך דריק קודם ליסט פייל'ס, קוק דורך צו די ווילסט טאקע אלעס ריקן אויב נישט מעק אים אויס, און פארגעס נישט צו זיכער מאכן אז עס בלייבט נישט קיין ליידיגע סעל'ס, דערנאך דריק מאוו פייל'ס, קוק איבער אין קאלום F די נאוט צו ער האט טאקע אלעס געריקט אדער געהאט פראבלעמען.
דא האסטו די פייל.
If i may ask, whats the benefit in doing file copying in VBA?
why not just copy and paste the traditional way?
איך וויל מאכן א אפציע אין א User Form צו קענען זוכן פאר א רעקארד דורך אריינטייפן אין א Search Box איך בין זייער רוי אין VBA אבער אין א Worksheet האב איך געטראפן א וועג דאס צו מאכן, און דערווייל האב איך אויסגעשטעלט אין די Form אז דורך א Command Button עפענט ער יענע Sheet און דורך א מעקרא אין די Sheet עפענט ער צוריק די Form און ער לייגט אריין דארט די אויסגעוועלטע רעקארד.
איך לייג דא צו א סעמפל פייל פון וואס איך האב געמאכט אז מען זאל בעסער פארשטיין (אין די ארגינעלע פייל איז עס שענער אויסגעשטעלט און באהאלטן אלע איבעריגע אינפארמעשאן וואס די User דארף נישט זען).
איך זוך א וועג צו מאכן די גאנצע זאך אין מיין User Form, אדער צום ווייניגסטענס זאל די Search געטון ווערן אין א אנדערע Form אנשטאט אין א Worksheet.
אויב איינער קען העלפן וועל איך זייער דאנקבאר זיין, איך האב פראבירט פרעגן אין Google אבער אזוי ווי איך קען נישט עכט קיין VBA פארשטיי איך בכלל נישט די ענטפערס.
די בעסטע וועט זיין אויב איינער קען עס צולייגן אין דעם זעלבן פייל וואס איך לייג דא מיט, אזוי וועל איך לכאורה עס קענען איבערמאכן אין די עכטע פייל.
די סעמפל פייל
א דאנק פון פאראויס.
איך לייג דא צו א סעמפל פייל פון וואס איך האב געמאכט אז מען זאל בעסער פארשטיין (אין די ארגינעלע פייל איז עס שענער אויסגעשטעלט און באהאלטן אלע איבעריגע אינפארמעשאן וואס די User דארף נישט זען).
איך זוך א וועג צו מאכן די גאנצע זאך אין מיין User Form, אדער צום ווייניגסטענס זאל די Search געטון ווערן אין א אנדערע Form אנשטאט אין א Worksheet.
אויב איינער קען העלפן וועל איך זייער דאנקבאר זיין, איך האב פראבירט פרעגן אין Google אבער אזוי ווי איך קען נישט עכט קיין VBA פארשטיי איך בכלל נישט די ענטפערס.
די בעסטע וועט זיין אויב איינער קען עס צולייגן אין דעם זעלבן פייל וואס איך לייג דא מיט, אזוי וועל איך לכאורה עס קענען איבערמאכן אין די עכטע פייל.
די סעמפל פייל
א דאנק פון פאראויס.