Cortar texto en excel según caracter guia

Aquí esta el código para cortar una frase que este divida en tres utilizando un separador como caracter, en este caso es la ",".

Solo hay que cambiar la url de la celda y listo.

Ojo que si no te detecta la funcion EXTRAE (Office 2010 con SP1) entonces es MED.

Primera palabra

=ESPACIOS(IZQUIERDA(C77547;ENCONTRAR(",";C77547)-1))

Segunda palabra

=ESPACIOS(EXTRAE(C77547;ENCONTRAR(",";C77547)+1;ENCONTRAR(",";C77547;ENCONTRAR(",";C77547)+1)-ENCONTRAR(",";C77547)-1))

Tercera palabra

=ESPACIOS(DERECHA(C77547;LARGO(C77547)-ENCONTRAR(",";C77547;ENCONTRAR(",";C77547)+1)))

Espero les sirva

Sean felices! :) Y sientanse libres de opinar ;)

Extraer primera palabra de un string con sql server

Aquí esta la consulta ejemplo de como extraer de un string la primera palabra con sql server:

(SELECT PARSENAME(REPLACE('EXTRAER PRIMERA PALABRA', ' ', '.'), len('EXTRAER PRIMERA PALABRA')-len(replace('EXTRAER PRIMERA PALABRA',' ','')) + 1))

Espero les sirva.


Sean felices! :) Y siéntanse libres de opinar ;)

Extraer palabra por palabra con sql server

Es increible pero con esta instrucción puedo hacer referencia a una palabra.


SELECT PARSENAME(REPLACE('Hola quieros compañeros', ' ', '.'), 1)

SELECT PARSENAME(REPLACE('Hola quieros compañeros', ' ', '.'), 2)

SELECT PARSENAME(REPLACE('Hola quieros compañeros', ' ', '.'), 3)

Espero les sirva.

Sean felices! :) Y sientanse libres de opinar ;)

Crear string separado por comas desde resultados del select

Esta es la consulta para que si un resultado en SQL nos de por ejemplo 5 filas de resultado, entonces estas 5 se juntarán en una sola y se separará por un punto y coma(en este ejemplo):


SELECT 
       STUFF(
               (SELECT top 10 '; ' + campotabla
                FROM tabla
                where len(campotabla) > 3 --si queremos validar
                  FOR XML PATH ('')),1,2,'') 'nombrecolumnaresultado'


Espero les sirva, pues esto nos sirve por decirlo así para crear CSV.

Sean felices! :) Y siéntanse libres de opinar ;)

Split string a rows o filas con sql server

La funcion es de tipo tabla, así que para utilizarla es:

select * from dbo.function('uno-dos')

Y esta es la función gracias a stackoverflow:


CREATE FUNCTION Split (
      @InputString                  VARCHAR(8000),
      @Delimiter                    VARCHAR(50)
)

RETURNS @Items TABLE (
      Item                          VARCHAR(8000)
)

AS
BEGIN
      IF @Delimiter = ' '
      BEGIN
            SET @Delimiter = ','
            SET @InputString = REPLACE(@InputString, ' ', @Delimiter)
      END

      IF (@Delimiter IS NULL OR @Delimiter = '')
            SET @Delimiter = ','

--INSERT INTO @Items VALUES (@Delimiter) -- Diagnostic
--INSERT INTO @Items VALUES (@InputString) -- Diagnostic

      DECLARE @Item                 VARCHAR(8000)
      DECLARE @ItemList       VARCHAR(8000)
      DECLARE @DelimIndex     INT

      SET @ItemList = @InputString
      SET @DelimIndex = CHARINDEX(@Delimiter, @ItemList, 0)
      WHILE (@DelimIndex != 0)
      BEGIN
            SET @Item = SUBSTRING(@ItemList, 0, @DelimIndex)
            INSERT INTO @Items VALUES (@Item)

            -- Set @ItemList = @ItemList minus one less item
            SET @ItemList = SUBSTRING(@ItemList, @DelimIndex+1, LEN(@ItemList)-@DelimIndex)
            SET @DelimIndex = CHARINDEX(@Delimiter, @ItemList, 0)
      END -- End WHILE

      IF @Item IS NOT NULL -- At least one delimiter was encountered in @InputString
      BEGIN
            SET @Item = @ItemList
            INSERT INTO @Items VALUES (@Item)
      END

      -- No delimiters were encountered in @InputString, so just return @InputString
      ELSE INSERT INTO @Items VALUES (@InputString)

      RETURN

END -- End Function
GO


La siguiente versión es para que tenga la variable orden.


SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER FUNCTION [dbo].[SplitTabla] (
      @InputString                  VARCHAR(8000),
      @Delimiter                    VARCHAR(50)
)

RETURNS @Items TABLE (
      Item                          VARCHAR(8000),
      Orden INT
)

AS
BEGIN
DECLARE @auxorden INT
SET @auxorden = 0
      IF @Delimiter = ' '
      BEGIN
            SET @Delimiter = ','
            SET @InputString = REPLACE(@InputString, ' ', @Delimiter)
      END

      IF (@Delimiter IS NULL OR @Delimiter = '')
            SET @Delimiter = ','

--INSERT INTO @Items VALUES (@Delimiter) -- Diagnostic
--INSERT INTO @Items VALUES (@InputString) -- Diagnostic

      DECLARE @Item                 VARCHAR(8000)
      DECLARE @ItemList       VARCHAR(8000)
      DECLARE @DelimIndex     INT

      SET @ItemList = @InputString
      SET @DelimIndex = CHARINDEX(@Delimiter, @ItemList, 0)
      WHILE (@DelimIndex != 0)
      BEGIN
set @auxorden = @auxorden + 1;
            SET @Item = SUBSTRING(@ItemList, 0, @DelimIndex)
            INSERT INTO @Items VALUES (@Item, @auxorden)

            -- Set @ItemList = @ItemList minus one less item
            SET @ItemList = SUBSTRING(@ItemList, @DelimIndex+1, LEN(@ItemList)-@DelimIndex)
            SET @DelimIndex = CHARINDEX(@Delimiter, @ItemList, 0)
      END -- End WHILE

      IF @Item IS NOT NULL -- At least one delimiter was encountered in @InputString
      BEGIN
set @auxorden = @auxorden + 1;
            SET @Item = @ItemList
            INSERT INTO @Items VALUES (@Item, @auxorden)
      END

      -- No delimiters were encountered in @InputString, so just return @InputString
      ELSE 
      BEGIN
set @auxorden = @auxorden + 1;
INSERT INTO @Items VALUES (@InputString, @auxorden)
      END

      RETURN

END -- End Function

Sean felices! :) Y siéntanse libres de opinar ;)