Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
22.01.2008 08:35:06 |
deni |
|
|
Aw:MsgBox funktioniert nicht |
22.01.2008 09:45:26 |
Holger |
|
|
|
22.01.2008 09:51:11 |
deni |
|
|
|
22.01.2008 10:31:29 |
Holger |
|
|
|
22.01.2008 10:45:28 |
deni |
|
|
|
22.01.2008 10:53:59 |
Holger |
|
|
|
22.01.2008 11:01:29 |
deni |
|
|
Von:
Holger |
Datum:
22.01.2008 09:45:26 |
Views:
1042 |
Rating:
|
Antwort:
|
Thema:
Aw:MsgBox funktioniert nicht |
Hallo Deni
kann es sein, dass sich in Zelle führende oder nachstehende Leerzeichen befinden. Diese kannst du mit
Trim(ActiveSheet.Cells(lastRow, 9).Value)
abschneiden.
Es ist auch möglich, dass UsedRange scheinbar falsche Werte liefert. Woran das liegt, habe ich noch nicht herausgefunden. Bei mir half dann ein neues Worksheet oder die simple Art, die letzte Zeile zu suchen:
Range("a65536").End(xlUp).Activate
lastRow = ActiveCell.Row
Ob UsedRange den erwarteten Wert ergibt, kannst du z.B. mit
ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Select
ausprobieren. Die LastCell wird dann markiert.
Ich hoffe, dir geholfen zu haben.
Holger
deni schrieb am 22.01.2008 08:35:06:
hallo
Ich habe da ein Problem mal wieder mtît VBA im Excel...
Ich möchte die letzte Zeile des Sheets herausfinden und wenn er in der 9ten Spalte New RFS steht dann soll eine MsgBox kommen, sonst nicht.
Ich habs mal so gemacht, aber leider funktionierts nicht, er will mir keine MsgBox ausgeben obwohl die letzte Zeile New RFS ist....
Sheets("webshop_inv_chind").Select
lastRow = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
If ActiveSheet.Cells(lastRow, 9).Value = "New RFS" Then MsgBox "Neuer 'New RFS' eintrag"
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
22.01.2008 08:35:06 |
deni |
|
|
Aw:MsgBox funktioniert nicht |
22.01.2008 09:45:26 |
Holger |
|
|
|
22.01.2008 09:51:11 |
deni |
|
|
|
22.01.2008 10:31:29 |
Holger |
|
|
|
22.01.2008 10:45:28 |
deni |
|
|
|
22.01.2008 10:53:59 |
Holger |
|
|
|
22.01.2008 11:01:29 |
deni |
|
|