Witam ! Mam problem, z uwagi na to, że excel widzi komórkę jako tekst poprzez poprzedzenie tego tekstu apostrofem, potrzebuję rozwiązania jak dodać a...

A funkcja konwersji na tekst =TEKST(A1; "0") nie wystarczy?

Nie próbowałem... Sprawdzę i dam znać. Dzięki za pomoc

Proponuję odpalić w VBA taką funkcję: Code: Function apostrof() For i = 1 To 30 For j = 1 To 5 Cells(i, j).Value = Chr(39) + CStr(Cells(i, j).Value) Next j Next i End Function Oczywiście zakres dla i, j ustalasz stosownie do potrzeb.

wrych A próbowałeś kolego odpalić tą funkcję? Dodane: Dla ułatwienia dodam, że to powinien być Sub a nie Function. Jeśli się mylę popraw mnie.

[EXCEL] Automatyczne dodawanie apostrofu do komórek

Reply | New topic

#1 14 Jul 2010 00:38

Marcin_Sk Marcin_Sk

Level 10

#1 14 Jul 2010 00:38

Witam !

Mam problem, z uwagi na to, że excel widzi komórkę jako tekst poprzez poprzedzenie tego tekstu apostrofem, potrzebuję rozwiązania jak dodać apostrof automatycznie do wszystkich komórek naraz. Mam oko 2500 wierszy i nie bardzo mi się chce do każdego wpisywać to ręcznie. Dzięki z góry
#2 14 Jul 2010 08:37

marcinj12 marcinj12

Level 40

Helpful post? (+2)

#2 14 Jul 2010 08:37

A funkcja konwersji na tekst =TEKST(A1; "0") nie wystarczy?
#3 14 Jul 2010 09:34

Marcin_Sk Marcin_Sk

Level 10

Topic author Helpful post? (0)

#3 14 Jul 2010 09:34

Nie próbowałem... Sprawdzę i dam znać. Dzięki za pomoc
#4 15 Jul 2010 23:06

wrych wrych

Level 20
Helpful post? (0)

#4 15 Jul 2010 23:06

Proponuję odpalić w VBA taką funkcję:
Code:
Function apostrof()
For i = 1 To 30
For j = 1 To 5
Cells(i, j).Value = Chr(39) + CStr(Cells(i, j).Value)
Next j
Next i
End Function

Oczywiście zakres dla i, j ustalasz stosownie do potrzeb.
#5 05 Aug 2010 14:36

walek33 walek33

Level 29

Helpful post? (+3)

#5 05 Aug 2010 14:36

wrych
A próbowałeś kolego odpalić tą funkcję?

Dodane:
Dla ułatwienia dodam, że to powinien być Sub a nie Function. Jeśli się mylę popraw mnie.

Reply | New topic