תחומים - פורום חרדי מקצועי

@avi-rz אמר בנוסחה באקסל:

אולי תכניס את התא שממנו אתה רוצה לשלוף את הערך לתוך nz

nz זה פונקציה של אקסס ושפת vba אבל אין נוסחת nz באקסל

@odeddvir
את האמת נתקלתי בבעיה הזו וכבר סידרתי את זה על פי זה..
אבל לך מגיע הקרדיט משום תועלת הרבים...

לאחר שהר' @רחמים עזר לי באישי בטוב טעם ודעת הסביר כל מילה בצורה הכי ברורה שאפשר (וכל מילה שלי מיותרת...)
פשוט מדהים לראות את התוצאה ...
ע"כ אני מעלה לכאן לתועלת הרבים את הפונקציה שהר' @רחמים כתב

Function FindAndHit(findWhat As Variant, text As Variant) As String

    If IsNull(findWhat) Or IsNull(text) Then
        FindAndHit = IIf(IsNull(text), "", text)
        Exit Function
    End If

    Dim openTag As String
    openTag = "<font style=""BACKGROUND-COLOR:#FFFF00"">"
    Dim closeTag As String
    closeTag = "</font>"
    
    FindAndHit = Replace(text, findWhat, openTag & findWhat & closeTag)

End Function

וזה הקריאה בבונה לפונקציה

=FindAndHit(<ערך לחיפוש>,<שדה להחזרה>)

וזה התוצאה המדהימה

@רחמים מקווה שכתבתי טוב אם יש תיקונים תתקן אותי..
ול @clickone היקר הרבה תודה על הרעיון חיסכון של מלא זמן (והרבה הרבה.... )
וכמובן ל @חייםיודלביץ

מצאתי את ההגדרה
TextFormat
כדי לשנות לטקסט עשיר

me.<שם תיבת טקסט>.TextFormat=acTextFormatHTMLRichText

וכדי לשנות לטקסט רגיל

me.<שם תיבת טקסט>.TextFormat=acTextFormatPlain

אני רוצה לשנות לתיבת טקסט את התבנית טקסט מטקסט עשיר לרגיל ולהיפך ע"י קוד vba

איך אני אמור לכתוב את זה?

@clickone
כתבתי כך

=Replace(Nz([yy]![BookList]![IdBook],""),Nz([Forms]![yy1]![SearchTheEntireDocument1].[Text],""),"<font style=""BACKGROUND-COLOR:#FFFF00"">" & Nz([Forms]![yy1]![SearchTheEntireDocument1].[Text],"") & "</font>")

אבל אני מקבל שגיאה כזו
?Name#

@clickone
תוכל להביא לי לינק לנושא כדי שאני יבין משם איך לעשות את זה

@חייםיודלביץ אמר בהדגשת תוצאות חיפוש באקסס:

מצ"ב קובץ עם אופציה לחיפוש בתוך תיבת טקסט אחת, עם הדגשת התוצאה שהעלו פעם בפורום כשהיה נקרא COOD613 אם אני זוכר טוב זה הועלה ע"י @clickone

יכול להיות שזה נמצא בארכיון?

@avi-rz
ניסיתי ולא עוזר

@רחמים
עוד שאלה יש לי אם אני עושה את זה עם פקד html אני יוכל לערוך את השורות או להוסיף שורות כמו שיש לי בטופס באקסס או שזה כמו תמונה..

@רחמים אמר בהדגשת תוצאות חיפוש באקסס:

ואם אתה צריך אינטרקציה בין אקסס לHTML זה גם אפשרי.

??

@רחמים
ברמת העיקרון זה סוג של מותרות בתוכנה הזו כך שזה לא דחוף אבל מאידך זה יכול להקל מאוד
לגבי זה שאין אופציה בעיצוב מותנה לעשות מכיל יש פתרון?

@רחמים
אשמח אם תוכל לפרט לי
או להראות לי דוגמאות שעשית...

התקדמות אבל....
הצלחתי בעיצוב מותנה שאם הערך בחיפוש הוא שווה ל אז הוא יסמן לי את כל התא בצהוב אמנם ישנם 2 בעיות

1. הצלחתי לעשות את זה על כל התא שבו נמצא המלל אבל לא רק על התוצאה
2. א"א משום מה בעיצוב מותנה לעשות אופציה של מכיל אלא רק שווה ל
   

אולי יש פתרון בקוד vba??

יש לי חיפוש בכל המסמך שעשיתי כמו ש @OdedDvir הסביר בטוב טעם כאן

ב"ה עובד מעולה ובשימוש כבר הרבה זמן
אמנם רציתי לשאול האם אני יכול לשפר אותו ע"י הדגשה (באופן כל שהיא) של התוצאות חיפוש כמו בתמונה הבאה או אחרת

או אפי' שהאותיות יהיו בצבע שונה

את האמת אני חושב שיתכן ולא אפשרי כי ניסיתי באופן ידני לשנות חלק מהתווים בתא לצבע שונה או לעשות להם רקע שונה ולא הצלחתי מה שנראה כלא אפשרי... (הלוואי ויתקנו אותי)..
תודה רבה מראש..

@yossiz
תודה רבה אין מילים

@רחמים עד כמה הרעיון הזה מוצלח כאשר אני צריך לסרוק מאות הסרטות... ???

@yossiz ,

כך הפעלתי את הפונקציה

var ee = Helpers.GetDetails(file);

וזה הערך שהפונקציה מחזירה (במקום לקבל זמן)

System.Collections.Generic.Dictionary`2[System.String,System.String]

@yossiz , לגבי הקוד הראשון שהבאת
זה מחזיר לי שגיאה בclass

Severity	Code	Description	Project	File	Line	Suppression State
Error	CS1106	Extension method must be defined in a non-generic static class	SearchByTime	C:\Users\uri\source\repos\SearchByTime\SearchByTime\Form1.cs	16	Active

איך אני יכול לקבל את אורך ההסרטה כ TimeSpan ב#C?